(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 12.1' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[    151859,       3270]
NotebookOptionsPosition[     45365,       1179]
NotebookOutlinePosition[    143211,       3079]
CellTagsIndexPosition[    142260,       3048]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["EvaluationStatusUpdate", "Title",
 Deletable->False,
 CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[
       SelectedNotebook[], After, Cell]; NotebookFind[
       SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, 
       WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[
       SelectedNotebook[], All, CellContents, AutoScroll -> True]], 
   PassEventsDown -> False, PassEventsUp -> False},
 CellChangeTimes->{3.7886330343857436`*^9},
 CellTags->{"Name", "TemplateCell", "Title", "TabNext"},
 CellID->863144461,ExpressionUUID->"f6181f0f-9201-4c4a-9b0a-4af3f323406e"],

Cell["Give status updates while your code is running", "Text",
 Deletable->False,
 CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[
       SelectedNotebook[], After, Cell]; NotebookFind[
       SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, 
       WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[
       SelectedNotebook[], All, CellContents, AutoScroll -> True]], 
   PassEventsDown -> False, PassEventsUp -> False},
 CellChangeTimes->{{3.7886330588378096`*^9, 3.788633082903107*^9}},
 CellTags->{"Description", "TemplateCell", "TabNext"},
 CellID->997449289,ExpressionUUID->"7ac5a8da-f221-4b4d-84c9-85b4dd536fee"],

Cell[CellGroupData[{

Cell[TextData[{
 "Definition",
 Cell[BoxData[
  TemplateBox[{"Definition", 
    Cell[
     BoxData[
      FrameBox[
       Cell[
       "Define your function using the name you gave in the Title line above. \
You can add input cells and extra code to define additional input cases or \
prerequisites. All definitions, including dependencies, will be included in \
the generated resource function.\n\nThis section should be evaluated before \
creating the Examples section below.", "MoreInfoText"], Background -> 
       GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], 
       RoundingRadius -> 5]], "MoreInfoText", Deletable -> True, 
     CellTags -> {"SectionMoreInfoDefinition"}, 
     CellMargins -> {{66, 66}, {15, 15}}]},
   "MoreInfoOpenerButtonTemplate"]],ExpressionUUID->
  "4a17b0ba-9351-48c0-ba08-de5d203a0713"]
}], "Section",
 Editable->False,
 Deletable->False,
 DefaultNewCellStyle->"Input",
 CellTags->{"Definition", "Function", "TemplateCellGroup"},
 CellID->271561301,ExpressionUUID->"d4cfa75a-863c-4862-b5a7-8121aef65f21"],

Cell[BoxData[
 RowBox[{
  RowBox[{"EvaluationStatusUpdate", "[", "tag_String", "]"}], ":=", 
  RowBox[{"Module", "[", 
   RowBox[{
    RowBox[{"{", "}"}], ",", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"EvaluationStatusUpdate", "[", 
      RowBox[{"tag", ",", "\"\<\>\""}], "]"}], ";", "\[IndentingNewLine]", 
     RowBox[{"PrintTemporary", "[", "\[IndentingNewLine]", 
      RowBox[{"Dynamic", "[", "\[IndentingNewLine]", 
       RowBox[{"Framed", "[", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"CurrentValue", "[", 
          RowBox[{
           RowBox[{"EvaluationNotebook", "[", "]"}], ",", 
           RowBox[{"{", 
            RowBox[{"TaggingRules", ",", "\"\<Message\>\"", ",", "tag"}], 
            "}"}]}], "]"}], ",", "\[IndentingNewLine]", 
         RowBox[{"ImageSize", "\[Rule]", "Full"}], ",", "\[IndentingNewLine]", 
         RowBox[{"Background", "\[Rule]", "Orange"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"BaseStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{"\"\<Text\>\"", ",", 
            RowBox[{"FontColor", "\[Rule]", "White"}]}], "}"}]}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"RoundingRadius", "\[Rule]", "5"}], ",", 
         "\[IndentingNewLine]", 
         RowBox[{"FrameStyle", "\[Rule]", "Black"}]}], "\[IndentingNewLine]", 
        "]"}], "]"}], "]"}], ";"}]}], "\[IndentingNewLine]", "]"}]}]], "Input",
 CellChangeTimes->{{3.788630934140005*^9, 3.788630999634863*^9}, {
   3.788631039525386*^9, 3.7886310437384415`*^9}, {3.7886311160753884`*^9, 
   3.7886311185234203`*^9}, {3.7886312332383647`*^9, 3.788631312132391*^9}, {
   3.788631366070094*^9, 3.7886313785172544`*^9}, {3.7886314160474973`*^9, 
   3.788631444429867*^9}, {3.7886318033797116`*^9, 3.7886318366891336`*^9}, {
   3.788631897450907*^9, 3.7886319299293213`*^9}, {3.7886323989892497`*^9, 
   3.7886324355077095`*^9}, {3.788632478710249*^9, 3.7886324885083714`*^9}, {
   3.788632536134967*^9, 3.788632537387982*^9}, {3.788632627470108*^9, 
   3.7886326484923735`*^9}, 3.7886327686397543`*^9, {3.7886329202722836`*^9, 
   3.788632924246333*^9}, {3.7886329975533557`*^9, 3.7886330080824184`*^9}},
 CellLabel->"In[126]:=",
 CellID->358736959,ExpressionUUID->"a64f9ff6-057b-48a6-a287-2a5da7017184"],

Cell[BoxData[
 RowBox[{
  RowBox[{"EvaluationStatusUpdate", "[", 
   RowBox[{"tag_String", ",", "message_String"}], "]"}], ":=", 
  RowBox[{"Module", "[", 
   RowBox[{
    RowBox[{"{", "}"}], ",", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{
      RowBox[{"CurrentValue", "[", 
       RowBox[{
        RowBox[{"EvaluationNotebook", "[", "]"}], ",", 
        RowBox[{"{", 
         RowBox[{"TaggingRules", ",", "\"\<Message\>\"", ",", "tag"}], 
         "}"}]}], "]"}], "=", 
      RowBox[{"(", 
       RowBox[{"\"\<\[WolframLanguageLogoCircle]\\t\>\"", "<>", "message"}], 
       ")"}]}], ";"}]}], "\[IndentingNewLine]", "]"}]}]], "Input",
 CellChangeTimes->{{3.7886311884797792`*^9, 3.7886312052440004`*^9}, {
   3.788631390989416*^9, 3.7886313932559566`*^9}, {3.788631853075344*^9, 
   3.7886318820717115`*^9}, {3.78863242529358*^9, 3.7886324285146217`*^9}, {
   3.788632575534459*^9, 3.788632602787801*^9}, {3.788632693518937*^9, 
   3.788632708493123*^9}, {3.7886327925680485`*^9, 3.7886327933170586`*^9}, 
   3.7886330110254555`*^9},
 CellLabel->"In[127]:=",
 CellID->42226684,ExpressionUUID->"5c9b17ae-1602-4e55-86bb-45e14d308ae7"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Documentation", "Section",
 CellTags->"Documentation",
 CellID->363488142,ExpressionUUID->"b9005b1d-1c5f-4d2b-b2d5-9074bbfd15d1"],

Cell[CellGroupData[{

Cell[TextData[{
 "Usage",
 Cell[BoxData[
  TemplateBox[{"Usage", 
    Cell[
     BoxData[
      FrameBox[
       Cell[
        TextData[{
         "Document input usage cases by first typing an input structure, then \
pressing ", 
          Cell[
           BoxData[
            StyleBox[
             DynamicBox[
              ToBoxes[
               
               If[$OperatingSystem === "MacOSX", "\[ReturnKey]", 
                "\[EnterKey]"], StandardForm], SingleEvaluation -> True, 
              Evaluator -> "System"], ShowStringCharacters -> False]]], 
          " to add a brief explanation of the function\[CloseCurlyQuote]s \
behavior for that structure. Pressing ", 
          Cell[
           BoxData[
            StyleBox[
             DynamicBox[
              ToBoxes[
               
               If[$OperatingSystem === "MacOSX", "\[ReturnKey]", 
                "\[EnterKey]"], StandardForm], SingleEvaluation -> True, 
              Evaluator -> "System"], ShowStringCharacters -> False]]], 
          " repeatedly will create new cases as needed. Every input usage \
case defined above should be demonstrated explicitly here.\n\nSee existing \
documentation pages for examples."}], "MoreInfoText"], Background -> 
       GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], 
       RoundingRadius -> 5]], "MoreInfoText", Deletable -> True, 
     CellTags -> {"SectionMoreInfoUsage"}, 
     CellMargins -> {{66, 66}, {15, 15}}]},
   "MoreInfoOpenerButtonTemplate"]],ExpressionUUID->
  "5c107007-f0eb-4a1a-9861-a3c8bc46c490"]
}], "Subsection",
 Editable->False,
 Deletable->False,
 DefaultNewCellStyle->{"UsageInputs", FontFamily -> "Source Sans Pro"},
 CellTags->{"TemplateCellGroup", "Usage"},
 CellID->657272351,ExpressionUUID->"2f96b192-bd56-4ab9-9aa3-7140a0608e08"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"EvaluationStatusUpdate", "[", 
  StyleBox["tag", "TI"], "]"}]], "UsageInputs",
 CellChangeTimes->{{3.788633104503375*^9, 3.788633134280745*^9}},
 FontFamily->"Source Sans Pro",
 CellTags->"TabNext",
 CellID->341013815,ExpressionUUID->"5ad56cd9-e63d-40c1-8bd8-32a878ab3a26"],

Cell[TextData[{
 "start the evaluation status update, using ",
 Cell[BoxData[
  StyleBox["tag", "TI"]], "InlineFormula",
  FontFamily->"Source Sans Pro",ExpressionUUID->
  "14de6036-1cc2-4445-a443-47d7d945d80d"],
 "."
}], "UsageDescription",
 CellChangeTimes->{{3.788633121246584*^9, 3.7886331488179255`*^9}},
 CellTags->"TabNext",
 CellID->584004037,ExpressionUUID->"7c7223b2-0e52-486a-a085-43fd4852a2d7"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"MyFunction", "[", 
  RowBox[{
   StyleBox["tag", "TI"], ",", 
   StyleBox["message", "TI"]}], "]"}]], "UsageInputs",
 TaggingRules->{
  "ResourceType" -> "Function", "ResourceCreateNotebook" -> True, 
   "TemplateVersion" -> "1.3.1", "CreationTimestamp" -> 
   3.7886329842881905`17.331057525124155*^9, "UpdatedTimestamp" -> 
   3.7886329842881905`17.331057525124155*^9, "ToolsOpen" -> True, 
   "StatusMessage" -> ProgressIndicator[Appearance -> "Necklace"], 
   "SubmissionReviewData" -> {"Review" -> False}, "AttachedInlineCell" -> 
   CellObject[186625]},
 CellChangeTimes->{{3.7886331070064077`*^9, 3.788633115382511*^9}, {
  3.7886337987794657`*^9, 3.788633815710673*^9}},
 FontFamily->"Source Sans Pro",
 CellTags->"TabNext",
 CellID->31868842,ExpressionUUID->"bf8dbb11-8e4d-45bb-9494-1d0543871840"],

Cell[TextData[{
 "update evaluation status for ",
 Cell[BoxData[
  StyleBox["tag", "TI"]], "InlineFormula",
  FontFamily->"Source Sans Pro",ExpressionUUID->
  "ce653550-ffcc-4f21-be54-d0e7b585300c"],
 " with ",
 Cell[BoxData[
  StyleBox["message", "TI"]], "InlineFormula",
  FontFamily->"Source Sans Pro",ExpressionUUID->
  "b468f2e2-5fbb-4907-bdd7-2ffabf30dcfb"],
 "."
}], "UsageDescription",
 CellChangeTimes->{{3.788633153622985*^9, 3.788633177183277*^9}},
 CellTags->"TabNext",
 CellID->408893626,ExpressionUUID->"cd36b5f1-a152-4ae3-a1d9-c9cf7f007d44"]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell[TextData[{
 "Details & Options",
 Cell[BoxData[
  TemplateBox[{"Details & Options", 
    Cell[
     BoxData[
      FrameBox[
       Cell[
       "Give a detailed explanation of how the function is used and \
configured (e.g. acceptable input types, result formats, options \
specifications, background information). This section may include multiple \
cells, bullet lists, tables, hyperlinks and additional styles/structures as \
needed.\n\nAdd any other information that may be relevant, such as when the \
function was first discovered or how and why it is used within a given field. \
Include all relevant background or contextual information related to the \
function, its development, and its usage.", "MoreInfoText"], Background -> 
       GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], 
       RoundingRadius -> 5]], "MoreInfoText", Deletable -> True, 
     CellTags -> {"SectionMoreInfoDetailsOptions"}, 
     CellMargins -> {{66, 66}, {15, 15}}]},
   "MoreInfoOpenerButtonTemplate"]],ExpressionUUID->
  "03e18772-78fa-408b-a3b9-9d569a94525e"]
}], "Subsection",
 Editable->False,
 Deletable->False,
 DefaultNewCellStyle->"Notes",
 CellTags->{"Details & Options", "Notes", "TemplateCellGroup"},
 CellID->25317349,ExpressionUUID->"33bad14c-b36e-49c6-b2a4-db806adb0f01"],

Cell["Additional information about usage and options.", "Notes",
 CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[
       SelectedNotebook[], After, Cell]; NotebookFind[
       SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, 
       WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[
       SelectedNotebook[], All, CellContents, AutoScroll -> True]], 
   PassEventsDown -> False, PassEventsUp -> False},
 CellTags->"TabNext",
 CellID->521904482,ExpressionUUID->"67da5435-a568-4f86-bdb1-cbbd8226e597"]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell[TextData[{
 "Examples",
 Cell[BoxData[
  TemplateBox[{"Examples", 
    Cell[
     BoxData[
      FrameBox[
       Cell[
        TextData[{
         "Demonstrate the function\[CloseCurlyQuote]s usage, starting with \
the most basic use case and describing each example in a preceding text cell.\
\n\nWithin a group, individual examples can be delimited by inserting page \
breaks between them (either using ", 
          Cell[
           BoxData[
            StyleBox[
             TemplateBox[{
               StyleBox[
               "\"[Right-click]\"", FontFamily -> "Source Sans Pro", 
                FontWeight -> "SemiBold", FontColor -> GrayLevel[0.2863], 
                FontSize -> 14, StripOnInput -> False], 
               StyleBox[
               "\" \[FilledRightTriangle] \"", FontFamily -> 
                "Source Sans Pro", FontSize -> 13.86, FontColor -> 
                GrayLevel[0.5], StripOnInput -> False], 
               StyleBox[
               "\"Insert Page Break\"", FontFamily -> "Source Sans Pro", 
                FontWeight -> "SemiBold", FontColor -> GrayLevel[0.2863], 
                FontSize -> 14, StripOnInput -> False]}, "RowDefault"], 
             ShowStringCharacters -> False]]], 
          " between cells or through the menu using ", 
          Cell[
           BoxData[
            StyleBox[
             TemplateBox[{
               StyleBox[
               "\"Insert\"", FontFamily -> "Source Sans Pro", FontWeight -> 
                "SemiBold", FontColor -> GrayLevel[0.2863], FontSize -> 14, 
                StripOnInput -> False], 
               StyleBox[
               "\" \[FilledRightTriangle] \"", FontFamily -> 
                "Source Sans Pro", FontSize -> 13.86, FontColor -> 
                GrayLevel[0.5], StripOnInput -> False], 
               StyleBox[
               "\"Page Break\"", FontFamily -> "Source Sans Pro", FontWeight -> 
                "SemiBold", FontColor -> GrayLevel[0.2863], FontSize -> 14, 
                StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> 
             False]]], 
          ").\n\nExamples should be grouped into Subsection and Subsubsection \
cells similarly to existing documentation pages. Here are some typical \
Subsection names and the types of examples they normally contain:\n  ", 
          Cell[
           BoxData[
            StyleBox[
             TemplateBox[{
               StyleBox[
               "\"\[FilledSmallSquare] \"", FontColor -> 
                RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], 
               StyleBox[
               "\"Basic Examples: \"", FontFamily -> "Source Sans Pro", 
                FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> 
                False]}, "RowDefault"], ShowStringCharacters -> False]]], 
          "most basic function usage\n  ", 
          Cell[
           BoxData[
            StyleBox[
             TemplateBox[{
               StyleBox[
               "\"\[FilledSmallSquare] \"", FontColor -> 
                RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], 
               StyleBox[
               "\"Scope: \"", FontFamily -> "Source Sans Pro", FontWeight -> 
                "SemiBold", FontSize -> 14, StripOnInput -> False]}, 
              "RowDefault"], ShowStringCharacters -> False]]], 
          "input and display conventions, standard computational attributes \
(e.g. threading over lists)\n  ", 
          Cell[
           BoxData[
            StyleBox[
             TemplateBox[{
               StyleBox[
               "\"\[FilledSmallSquare] \"", FontColor -> 
                RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], 
               StyleBox[
               "\"Options: \"", FontFamily -> "Source Sans Pro", FontWeight -> 
                "SemiBold", FontSize -> 14, StripOnInput -> False]}, 
              "RowDefault"], ShowStringCharacters -> False]]], 
          "available options and parameters for the function\n  ", 
          Cell[
           BoxData[
            StyleBox[
             TemplateBox[{
               StyleBox[
               "\"\[FilledSmallSquare] \"", FontColor -> 
                RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], 
               StyleBox[
               "\"Applications: \"", FontFamily -> "Source Sans Pro", 
                FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> 
                False]}, "RowDefault"], ShowStringCharacters -> False]]], 
          "standard industry or academic applications\n  ", 
          Cell[
           BoxData[
            StyleBox[
             TemplateBox[{
               StyleBox[
               "\"\[FilledSmallSquare] \"", FontColor -> 
                RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], 
               StyleBox[
               "\"Properties and Relations: \"", FontFamily -> 
                "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, 
                StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> 
             False]]], "how the function relates to other functions\n  ", 
          Cell[
           BoxData[
            StyleBox[
             TemplateBox[{
               StyleBox[
               "\"\[FilledSmallSquare] \"", FontColor -> 
                RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], 
               StyleBox[
               "\"Possible Issues: \"", FontFamily -> "Source Sans Pro", 
                FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> 
                False]}, "RowDefault"], ShowStringCharacters -> False]]], 
          "limitations or unexpected behavior a user might experience\n  ", 
          Cell[
           BoxData[
            StyleBox[
             TemplateBox[{
               StyleBox[
               "\"\[FilledSmallSquare] \"", FontColor -> 
                RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], 
               StyleBox[
               "\"Neat Examples: \"", FontFamily -> "Source Sans Pro", 
                FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> 
                False]}, "RowDefault"], ShowStringCharacters -> False]]], 
          "particularly interesting, unconventional, or otherwise unique \
usage"}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, 
       FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5]], "MoreInfoText", 
     Deletable -> True, CellTags -> {"SectionMoreInfoExamples"}, 
     CellMargins -> {{66, 66}, {15, 15}}]},
   "MoreInfoOpenerButtonTemplate"]],ExpressionUUID->
  "6e50af0a-223f-4a4a-85a1-1022357ba5a9"]
}], "Section",
 Editable->False,
 Deletable->False,
 CellTags->{"Examples", "TemplateCellGroup"},
 CellID->487306095,ExpressionUUID->"fc7ecdc9-eae7-4611-a41d-04f37b474bf1"],

Cell[CellGroupData[{

Cell["Basic Examples", "Subsection",
 CellID->462042388,ExpressionUUID->"c9aa0128-8721-417f-a772-378c24a4f2bd"],

Cell[TextData[{
 "Define a test function which uses ",
 Cell[BoxData["EvaluationStatusUpdate"], "InlineFormula",
  FontFamily->"Source Sans Pro",ExpressionUUID->
  "ae21419b-b941-4879-b2d0-c9ec1cda3db2"],
 " multiple times:"
}], "Text",
 CellChangeTimes->{{3.7886331989745483`*^9, 3.788633227707903*^9}},
 CellID->13078159,ExpressionUUID->"50a622ee-deed-41e0-977b-46bfd7d7d15e"],

Cell[BoxData[
 RowBox[{
  RowBox[{"Test", "[", "]"}], ":=", 
  RowBox[{"Module", "[", 
   RowBox[{
    RowBox[{"{", "}"}], ",", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"EvaluationStatusUpdate", "[", "\"\<xyz\>\"", "]"}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"Pause", "[", "1", "]"}], ";", "\[IndentingNewLine]", 
     RowBox[{"EvaluationStatusUpdate", "[", 
      RowBox[{"\"\<xyz\>\"", ",", "\"\<Downloading\[Ellipsis]\>\""}], "]"}], 
     ";", "\[IndentingNewLine]", 
     RowBox[{"Pause", "[", "1", "]"}], ";", "\[IndentingNewLine]", 
     RowBox[{"EvaluationStatusUpdate", "[", 
      RowBox[{"\"\<xyz\>\"", ",", "\"\<Loading from cache\[Ellipsis]\>\""}], 
      "]"}], ";", "\[IndentingNewLine]", 
     RowBox[{"Pause", "[", "1", "]"}], ";", "\[IndentingNewLine]", 
     RowBox[{"EvaluationStatusUpdate", "[", 
      RowBox[{"\"\<xyz\>\"", ",", "\"\<Initializing code\[Ellipsis]\>\""}], 
      "]"}], ";", "\[IndentingNewLine]", 
     RowBox[{"Pause", "[", "1", "]"}], ";", "\[IndentingNewLine]", "42"}]}], 
   "]"}]}]], "Input",
 CellChangeTimes->{3.788633185667382*^9},
 CellID->443871870,ExpressionUUID->"3d5b7d93-809f-4001-831d-cc43feab61aa"],

Cell["Evaluate the test function:", "Text",
 CellChangeTimes->{{3.7886331989745483`*^9, 3.788633227707903*^9}, {
  3.7886335333202176`*^9, 3.7886335414163213`*^9}},
 CellID->276878918,ExpressionUUID->"98b407e4-7c48-47ff-8394-aee44cabed21"],

Cell[BoxData[
 RowBox[{"Test", "[", "]"}]], "Input",
 CellID->222156811,ExpressionUUID->"4a7db7d7-e603-4973-a6b3-fabf6b81e360"],

Cell["\<\
The test function will print a status update cell. After one second the \
status will read:\
\>", "Text",
 CellChangeTimes->{{3.7886335471303864`*^9, 3.788633617449253*^9}, {
  3.788633658121751*^9, 3.788633668576879*^9}},
 CellID->419280125,ExpressionUUID->"f048a551-2a2d-4a99-bf39-fab22351aab9"],

Cell[BoxData[
 FrameBox["\<\"\[WolframLanguageLogoCircle]\\tDownloading\[Ellipsis]\"\>",
  Background->RGBColor[1, 0.5, 0],
  BaseStyle->{"Text", FontColor -> GrayLevel[1]},
  FrameStyle->GrayLevel[0],
  ImageSize->Full,
  RoundingRadius->5,
  StripOnInput->False]], "Print",
 CellChangeTimes->{{3.7886334640043683`*^9, 3.7886335007738194`*^9}, 
   3.7886338459530425`*^9},
 CellLabel->"During evaluation of In[147]:=",
 CellID->102525359,ExpressionUUID->"af07e898-c92c-4592-8f69-237886f41ad8"],

Cell["After two seconds the status will read:", "Text",
 CellChangeTimes->{{3.78863362289732*^9, 3.78863363013741*^9}},
 CellID->348031179,ExpressionUUID->"7cb9a296-1f08-4b6f-9f0e-4db289eacc6c"],

Cell[BoxData[
 FrameBox["\<\"\[WolframLanguageLogoCircle]\\tLoading from cache\[Ellipsis]\"\
\>",
  Background->RGBColor[1, 0.5, 0],
  BaseStyle->{"Text", FontColor -> GrayLevel[1]},
  FrameStyle->GrayLevel[0],
  ImageSize->Full,
  RoundingRadius->5,
  StripOnInput->False]], "Print",
 CellChangeTimes->{{3.7886334640043683`*^9, 3.7886335007738194`*^9}, {
  3.7886338459530425`*^9, 3.788633862200238*^9}},
 CellLabel->"During evaluation of In[148]:=",
 CellID->275814207,ExpressionUUID->"99a98a9f-08dc-4c2c-a742-730738940893"],

Cell["After three seconds the status will read:", "Text",
 CellChangeTimes->{{3.788633634578463*^9, 3.7886336486896353`*^9}},
 CellID->343388591,ExpressionUUID->"fc000883-8b7f-4fca-a6ff-077745ef5bc8"],

Cell[BoxData[
 FrameBox["\<\"\[WolframLanguageLogoCircle]\\tInitializing \
code\[Ellipsis]\"\>",
  Background->RGBColor[1, 0.5, 0],
  BaseStyle->{"Text", FontColor -> GrayLevel[1]},
  FrameStyle->GrayLevel[0],
  ImageSize->Full,
  RoundingRadius->5,
  StripOnInput->False]], "Print",
 CellChangeTimes->{{3.7886334640043683`*^9, 3.7886335007738194`*^9}, {
  3.7886338459530425`*^9, 3.788633877199423*^9}},
 CellLabel->"During evaluation of In[150]:=",
 CellID->621837776,ExpressionUUID->"95771b9c-f7e4-44a8-9477-2f838efacbab"],

Cell["\<\
After four seconds the status update cell disappears and the test function \
output is returned:\
\>", "Text",
 CellChangeTimes->{{3.788633678545003*^9, 3.788633701161276*^9}},
 CellID->94093802,ExpressionUUID->"e2a0ff58-2672-4bb2-8f03-1af207114672"],

Cell[BoxData["42"], "Output",
 CellChangeTimes->{
  3.788631181258685*^9, 3.788631250719592*^9, {3.7886312818629975`*^9, 
   3.78863128821408*^9}, 3.7886314012223043`*^9, {3.788631455402114*^9, 
   3.7886314663802567`*^9}, 3.7886317911005545`*^9, {3.788631892429845*^9, 
   3.7886319394164405`*^9}, 3.78863197012383*^9, {3.788632052583877*^9, 
   3.788632075137163*^9}, 3.788632134061917*^9, 3.7886323031770425`*^9, 
   3.7886323655838304`*^9, 3.788632408465369*^9, 3.788632443501809*^9, {
   3.7886324781112423`*^9, 3.788632565301332*^9}, {3.7886325959067135`*^9, 
   3.78863261464495*^9}, {3.788632658683499*^9, 3.78863274179842*^9}, {
   3.7886327884949985`*^9, 3.7886328101822677`*^9}, {3.7886328685426435`*^9, 
   3.7886329312444234`*^9}, 3.7886329688909974`*^9, 3.7886330251906304`*^9, {
   3.7886332424550853`*^9, 3.7886332597573013`*^9}, {3.7886333652751513`*^9, 
   3.7886333792773232`*^9}},
 CellLabel->"Out[142]=",
 CellID->38682943,ExpressionUUID->"78ff84ae-489a-4a39-bee2-030e1999249e"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Scope", "Subsection",
 CellID->964056545,ExpressionUUID->"eca53f1e-bf07-4301-a6ce-a76254cc6059"],

Cell["\<\
Text about additional examples expanding scope (and see other sections for \
options, applications, etc):\
\>", "Text",
 CellID->649685796,ExpressionUUID->"46b4e134-5c95-44d4-8577-56622b189df7"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"MyFunction", "[", 
  RowBox[{"x", ",", "y", ",", "z"}], "]"}]], "Input",
 CellLabel->"In[2]:= ",
 CellID->836153427,ExpressionUUID->"48d4f25b-9def-4f34-8c4d-887319bcb20b"],

Cell[BoxData[
 RowBox[{"x", " ", "y", " ", "z"}]], "Output",
 CellLabel->"Out[2]= ",
 CellID->147179208,ExpressionUUID->"cc273585-cf5b-4af2-8755-d071c18a3129"]
}, Open  ]]
}, Open  ]],

Cell["Options", "Subsection",
 CellID->776923543,ExpressionUUID->"55028938-382d-4f68-a553-ac09174e363f"],

Cell["Applications", "Subsection",
 CellID->568056528,ExpressionUUID->"b19edd06-8da5-4334-8a17-4c5da46f2210"],

Cell["Properties and Relations", "Subsection",
 CellID->754506620,ExpressionUUID->"9ac4a8cd-b9b9-4703-9f76-48779071a24d"],

Cell["Possible Issues", "Subsection",
 CellID->92483860,ExpressionUUID->"243c172f-9793-42a6-a40b-763074e87f3d"],

Cell["Neat Examples", "Subsection",
 CellID->540091361,ExpressionUUID->"1ef0203e-2fd8-4fa4-9b8e-affab2d5b384"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Source & Additional Information", "Section",
 CellTags->"Source & Additional Information",
 CellID->348526984,ExpressionUUID->"280d96d4-4373-474f-a659-8edbdf8cf485"],

Cell[CellGroupData[{

Cell[TextData[{
 "Contributed By",
 Cell[BoxData[
  TemplateBox[{"Contributed By", 
    Cell[
     BoxData[
      FrameBox[
       Cell[
       "Enter the name of the person, people or organization that should be \
publicly credited with contributing this function.", "MoreInfoText"], 
       Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> 
       GrayLevel[0.9], RoundingRadius -> 5]], "MoreInfoText", Deletable -> 
     True, CellTags -> {"SectionMoreInfoContributedBy"}, 
     CellMargins -> {{66, 66}, {15, 15}}]},
   "MoreInfoOpenerButtonTemplate"]],ExpressionUUID->
  "2281953f-d634-44ee-8c7e-14deb1da8f61"]
}], "Subsection",
 Editable->False,
 Deletable->False,
 DefaultNewCellStyle->"Text",
 CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"},
 CellID->581484318,ExpressionUUID->"a3651dd8-397a-41d2-83ca-16b10ee5d783"],

Cell["Arnoud Buzing", "Text",
 CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[
       SelectedNotebook[], After, Cell]; NotebookFind[
       SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, 
       WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[
       SelectedNotebook[], All, CellContents, AutoScroll -> True]], 
   PassEventsDown -> False, PassEventsUp -> False},
 CellChangeTimes->{{3.78863372933862*^9, 3.7886337319136505`*^9}},
 CellTags->"TabNext",
 CellID->832483124,ExpressionUUID->"7c84c0c1-1173-4213-b48e-1580f260a399"]
}, Open  ]],

Cell[CellGroupData[{

Cell[TextData[{
 "Keywords",
 Cell[BoxData[
  TemplateBox[{"Keywords", 
    Cell[
     BoxData[
      FrameBox[
       Cell[
       "List relevant terms (e.g. functional areas, algorithm names, related \
concepts) that should be used to include the function in search results.", 
        "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, 
       FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5]], "MoreInfoText", 
     Deletable -> True, CellTags -> {"SectionMoreInfoKeywords"}, 
     CellMargins -> {{66, 66}, {15, 15}}]},
   "MoreInfoOpenerButtonTemplate"]],ExpressionUUID->
  "96561529-5185-4628-9688-e31f2a32c42e"]
}], "Subsection",
 Editable->False,
 Deletable->False,
 DefaultNewCellStyle->"Item",
 CellTags->{"Keywords", "TemplateCellGroup"},
 CellID->234953024,ExpressionUUID->"79cc3f50-029b-485f-a1af-4ae5145cccef"],

Cell["keyword 1", "Item",
 CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[
       SelectedNotebook[], After, Cell]; NotebookFind[
       SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, 
       WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[
       SelectedNotebook[], All, CellContents, AutoScroll -> True]], 
   PassEventsDown -> False, PassEventsUp -> False},
 CellTags->"TabNext",
 CellID->123227828,ExpressionUUID->"500c7c8b-ab0d-4741-9dd0-a2001b44d23a"]
}, Open  ]],

Cell[CellGroupData[{

Cell["Categories", "Subsection",
 DefaultNewCellStyle->"Item",
 CellTags->{"Categories", "TemplateCellGroup"},
 CellID->360699210,ExpressionUUID->"538d2a3d-07db-4149-afc5-7925d0469e97"],

Cell[BoxData[
 TagBox[GridBox[{
    {
     StyleBox[
      TemplateBox[{
        CheckboxBox[False, {False, "Cloud & Deployment"}], "\" \"", 
        "\"Cloud & Deployment\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12], 
     StyleBox[
      TemplateBox[{
        CheckboxBox[
        "Core Language & Structure", {False, "Core Language & Structure"}], 
        "\" \"", "\"Core Language & Structure\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12]},
    {
     StyleBox[
      TemplateBox[{
        CheckboxBox[False, {False, "Data Manipulation & Analysis"}], "\" \"", 
        "\"Data Manipulation & Analysis\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12], 
     StyleBox[
      TemplateBox[{
        CheckboxBox[False, {False, "Engineering Data & Computation"}], 
        "\" \"", "\"Engineering Data & Computation\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12]},
    {
     StyleBox[
      TemplateBox[{
        CheckboxBox[False, {False, "External Interfaces & Connections"}], 
        "\" \"", "\"External Interfaces & Connections\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12], 
     StyleBox[
      TemplateBox[{
        CheckboxBox[False, {False, "Financial Data & Computation"}], "\" \"", 
        "\"Financial Data & Computation\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12]},
    {
     StyleBox[
      TemplateBox[{
        CheckboxBox[False, {False, "Geographic Data & Computation"}], "\" \"",
         "\"Geographic Data & Computation\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12], 
     StyleBox[
      TemplateBox[{
        CheckboxBox[False, {False, "Geometry"}], "\" \"", "\"Geometry\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12]},
    {
     StyleBox[
      TemplateBox[{
        CheckboxBox[False, {False, "Graphs & Networks"}], "\" \"", 
        "\"Graphs & Networks\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12], 
     StyleBox[
      TemplateBox[{
        CheckboxBox[False, {False, "Higher Mathematical Computation"}], 
        "\" \"", "\"Higher Mathematical Computation\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12]},
    {
     StyleBox[
      TemplateBox[{
        CheckboxBox[False, {False, "Images"}], "\" \"", "\"Images\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12], 
     StyleBox[
      TemplateBox[{
        CheckboxBox["Just For Fun", {False, "Just For Fun"}], "\" \"", 
        "\"Just For Fun\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12]},
    {
     StyleBox[
      TemplateBox[{
        CheckboxBox[
        False, {False, "Knowledge Representation & Natural Language"}], 
        "\" \"", "\"Knowledge Representation & Natural Language\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12], 
     StyleBox[
      TemplateBox[{
        CheckboxBox[False, {False, "Machine Learning"}], "\" \"", 
        "\"Machine Learning\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12]},
    {
     StyleBox[
      TemplateBox[{
        CheckboxBox[
        "Notebook Documents & Presentation", {
         False, "Notebook Documents & Presentation"}], "\" \"", 
        "\"Notebook Documents & Presentation\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12], 
     StyleBox[
      TemplateBox[{
        CheckboxBox[
        "Programming Utilities", {False, "Programming Utilities"}], "\" \"", 
        "\"Programming Utilities\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12]},
    {
     StyleBox[
      TemplateBox[{
        CheckboxBox[False, {False, "Repository Tools"}], "\" \"", 
        "\"Repository Tools\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12], 
     StyleBox[
      TemplateBox[{
        CheckboxBox[
        False, {False, "Scientific and Medical Data & Computation"}], "\" \"",
         "\"Scientific and Medical Data & Computation\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12]},
    {
     StyleBox[
      TemplateBox[{
        CheckboxBox[False, {False, "Social, Cultural & Linguistic Data"}], 
        "\" \"", "\"Social, Cultural & Linguistic Data\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12], 
     StyleBox[
      TemplateBox[{
        CheckboxBox[False, {False, "Sound"}], "\" \"", "\"Sound\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12]},
    {
     StyleBox[
      TemplateBox[{
        CheckboxBox[False, {False, "Strings & Text"}], "\" \"", 
        "\"Strings & Text\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12], 
     StyleBox[
      TemplateBox[{
        CheckboxBox[False, {False, "Symbolic & Numeric Computation"}], 
        "\" \"", "\"Symbolic & Numeric Computation\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12]},
    {
     StyleBox[
      TemplateBox[{
        CheckboxBox[False, {False, "System Operation & Setup"}], "\" \"", 
        "\"System Operation & Setup\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12], 
     StyleBox[
      TemplateBox[{
        CheckboxBox[
        "Time-Related Computation", {False, "Time-Related Computation"}], 
        "\" \"", "\"Time-Related Computation\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12]},
    {
     StyleBox[
      TemplateBox[{
        CheckboxBox[
        "User Interface Construction", {
         False, "User Interface Construction"}], "\" \"", 
        "\"User Interface Construction\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12], 
     StyleBox[
      TemplateBox[{
        CheckboxBox[False, {False, "Visualization & Graphics"}], "\" \"", 
        "\"Visualization & Graphics\""},
       "RowDefault"],
      StripOnInput->False,
      FontSize->12]}
   },
   AutoDelete->False,
   BaseStyle->{"ControlStyle"},
   ColumnsEqual->True,
   GridBoxAlignment->{"Columns" -> {{Left}}},
   GridBoxItemSize->{},
   RowsEqual->True],
  "Grid"]], "Output",
 Editable->False,
 Deletable->False,
 CellChangeTimes->{{3.7886337352476897`*^9, 3.788633754124926*^9}},
 CellTags->"CategoriesCell",
 CellID->725683702,ExpressionUUID->"8b0155aa-a24f-4a28-ad22-19b9670f3563"]
}, Open  ]],

Cell[CellGroupData[{

Cell[TextData[{
 "Related Symbols",
 Cell[BoxData[
  TemplateBox[{"Related Symbols", 
    Cell[
     BoxData[
      FrameBox[
       Cell[
       "List up to twenty documented, system-level Wolfram Language symbols \
related to the function.", "MoreInfoText"], Background -> GrayLevel[0.95], 
       FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 
       5]], "MoreInfoText", Deletable -> True, 
     CellTags -> {"SectionMoreInfoRelatedSymbols"}, 
     CellMargins -> {{66, 66}, {15, 15}}]},
   "MoreInfoOpenerButtonTemplate"]],ExpressionUUID->
  "e5d406d2-08d9-414a-9361-8349b36e3d32"]
}], "Subsection",
 Editable->False,
 Deletable->False,
 DefaultNewCellStyle->"Item",
 CellTags->{"Related Symbols", "TemplateCellGroup"},
 CellID->787980732,ExpressionUUID->"86086004-4d28-4f5b-9b74-c3ff70fafbca"],

Cell["SymbolName (documented Wolfram Language symbol)", "Item",
 CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[
       SelectedNotebook[], After, Cell]; NotebookFind[
       SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, 
       WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[
       SelectedNotebook[], All, CellContents, AutoScroll -> True]], 
   PassEventsDown -> False, PassEventsUp -> False},
 CellTags->"TabNext",
 CellID->79477165,ExpressionUUID->"02dacd04-fdb8-4948-a204-82cc827f8128"]
}, Open  ]],

Cell[CellGroupData[{

Cell[TextData[{
 "Related Resource Objects",
 Cell[BoxData[
  TemplateBox[{"Related Resource Objects", 
    Cell[
     BoxData[
      FrameBox[
       Cell[
       "List the names of published resource objects from any Wolfram \
repository that are related to this function.", "MoreInfoText"], Background -> 
       GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], 
       RoundingRadius -> 5]], "MoreInfoText", Deletable -> True, 
     CellTags -> {"SectionMoreInfoRelatedResourceObjects"}, 
     CellMargins -> {{66, 66}, {15, 15}}]},
   "MoreInfoOpenerButtonTemplate"]],ExpressionUUID->
  "f4194037-cff9-4b9f-8dcb-9d152c26193c"]
}], "Subsection",
 Editable->False,
 Deletable->False,
 DefaultNewCellStyle->"Item",
 CellTags->{"Related Resource Objects", "TemplateCellGroup"},
 CellID->202501204,ExpressionUUID->"99173e86-3d2c-4b91-9e6e-3f80441efafd"],

Cell["Resource Name (resources from any Wolfram repository)", "Item",
 CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[
       SelectedNotebook[], After, Cell]; NotebookFind[
       SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, 
       WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[
       SelectedNotebook[], All, CellContents, AutoScroll -> True]], 
   PassEventsDown -> False, PassEventsUp -> False},
 CellTags->"TabNext",
 CellID->960273585,ExpressionUUID->"23742a88-b915-451a-8670-5a45db9e3376"]
}, Open  ]],

Cell[CellGroupData[{

Cell[TextData[{
 "Source/Reference Citation",
 Cell[BoxData[
  TemplateBox[{"Source/Reference Citation", 
    Cell[
     BoxData[
      FrameBox[
       Cell[
       "Give a bibliographic-style citation for the original source of the \
function and/or its components (e.g. a published paper, algorithm, or code \
repository).", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 
       20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5]], 
     "MoreInfoText", Deletable -> True, 
     CellTags -> {"SectionMoreInfoSourceReferenceCitation"}, 
     CellMargins -> {{66, 66}, {15, 15}}]},
   "MoreInfoOpenerButtonTemplate"]],ExpressionUUID->
  "765e1604-ce67-46a3-aa00-6b63affa7cbb"]
}], "Subsection",
 Editable->False,
 Deletable->False,
 DefaultNewCellStyle->"Text",
 CellTags->{"Source/Reference Citation", "TemplateCellGroup"},
 CellID->720896096,ExpressionUUID->"9c95ac9b-75bf-470f-a1e2-ed79ba3c9950"],

Cell["Source, reference or citation information", "Text",
 CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[
       SelectedNotebook[], After, Cell]; NotebookFind[
       SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, 
       WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[
       SelectedNotebook[], All, CellContents, AutoScroll -> True]], 
   PassEventsDown -> False, PassEventsUp -> False},
 CellTags->"TabNext",
 CellID->343081869,ExpressionUUID->"dae70aa7-0c5a-4a63-9d89-7571818a98ec"]
}, Open  ]],

Cell[CellGroupData[{

Cell[TextData[{
 "Links",
 Cell[BoxData[
  TemplateBox[{"Links", 
    Cell[
     BoxData[
      FrameBox[
       Cell[
       "List additional URLs or hyperlinks for external information related \
to the function.", "MoreInfoText"], Background -> GrayLevel[0.95], 
       FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 
       5]], "MoreInfoText", Deletable -> True, 
     CellTags -> {"SectionMoreInfoLinks"}, 
     CellMargins -> {{66, 66}, {15, 15}}]},
   "MoreInfoOpenerButtonTemplate"]],ExpressionUUID->
  "02acdffb-8170-417f-8db2-13c8cb762070"]
}], "Subsection",
 Editable->False,
 Deletable->False,
 DefaultNewCellStyle->"Item",
 CellTags->{"Links", "TemplateCellGroup"},
 CellID->282884713,ExpressionUUID->"9589f8d3-750e-4df0-8553-cfefa527365e"],

Cell["Link to other related material", "Item",
 CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[
       SelectedNotebook[], After, Cell]; NotebookFind[
       SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, 
       WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[
       SelectedNotebook[], All, CellContents, AutoScroll -> True]], 
   PassEventsDown -> False, PassEventsUp -> False},
 CellTags->"TabNext",
 CellID->485448166,ExpressionUUID->"49abed7e-d882-42a2-9ef2-545519e3fc0a"]
}, Open  ]],

Cell[CellGroupData[{

Cell[TextData[{
 "Tests",
 Cell[BoxData[
  TemplateBox[{"Tests", 
    Cell[
     BoxData[
      FrameBox[
       Cell[
       "Specify an optional list of tests for verifying that the function is \
working properly in any environment. Tests can be specified as Input/Output \
cell pairs or as symbolic VerificationTest expressions for including \
additional options.", "MoreInfoText"], Background -> GrayLevel[0.95], 
       FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 
       5]], "MoreInfoText", Deletable -> True, 
     CellTags -> {"SectionMoreInfoTests"}, 
     CellMargins -> {{66, 66}, {15, 15}}]},
   "MoreInfoOpenerButtonTemplate"]],ExpressionUUID->
  "afb0b812-6f44-4c63-bf0b-0aa53903ff83"]
}], "Subsection",
 Editable->False,
 Deletable->False,
 DefaultNewCellStyle->"Input",
 CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"},
 CellID->899735658,ExpressionUUID->"da064dbe-0ed9-40ad-bb18-d3f82cc8ae23"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"MyFunction", "[", 
  RowBox[{"x", ",", "y"}], "]"}]], "Input",
 CellLabel->"In[3]:=",
 CellID->667877521,ExpressionUUID->"f71ac60b-e0ba-461c-ad67-5f4ee85bc276"],

Cell[BoxData[
 RowBox[{"x", " ", "y"}]], "Output",
 CellLabel->"Out[3]=",
 CellID->993233288,ExpressionUUID->"67cfff4d-af89-4f12-9aa4-0dacafe8d1f2"]
}, Open  ]]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Author Notes", "Section",
 DefaultNewCellStyle->"Text",
 CellTags->{"Author Notes", "TemplateCellGroup"},
 CellID->871584409,ExpressionUUID->"88e7e1f8-c326-4af2-907e-b6f7cd231fb9"],

Cell["Additional information about limitations, issues, etc.", "Text",
 CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[
       SelectedNotebook[], After, Cell]; NotebookFind[
       SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, 
       WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[
       SelectedNotebook[], All, CellContents, AutoScroll -> True]], 
   PassEventsDown -> False, PassEventsUp -> False},
 CellTags->"TabNext",
 CellID->567921317,ExpressionUUID->"263262db-c25d-464c-9dfe-1f30c0af97e0"]
}, Open  ]],

Cell[CellGroupData[{

Cell[TextData[{
 "Submission Notes",
 Cell[BoxData[
  TemplateBox[{"Submission Notes", 
    Cell[
     BoxData[
      FrameBox[
       Cell[
       "Enter any additional information that you would like to communicate \
to the reviewer here. This section will not be included in the published \
resource.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 
       20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5]], 
     "MoreInfoText", Deletable -> True, 
     CellTags -> {"SectionMoreInfoSubmissionNotes"}, 
     CellMargins -> {{66, 66}, {15, 15}}]},
   "MoreInfoOpenerButtonTemplate"]],ExpressionUUID->
  "5e216bf4-f0fe-488f-946a-7183c067be6e"]
}], "Section",
 Editable->False,
 Deletable->False,
 DefaultNewCellStyle->"Text",
 CellTags->{"Submission Notes", "TemplateCellGroup"},
 CellID->22658912,ExpressionUUID->"c2ad0594-c7f8-4152-a325-f04f8e18f05a"],

Cell["Additional information for the reviewer.", "Text",
 CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[
       SelectedNotebook[], After, Cell]; NotebookFind[
       SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, 
       WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[
       SelectedNotebook[], All, CellContents, AutoScroll -> True]], 
   PassEventsDown -> False, PassEventsUp -> False},
 CellTags->"TabNext",
 CellID->920818074,ExpressionUUID->"45e4f379-b8bd-413c-ba86-6dff720a7f15"]
}, Open  ]]
}, Open  ]]
},
WindowSize->{801., 713.5},
WindowMargins->{{151.5, Automatic}, {Automatic, 103}},
Visible->True,
DockedCells->{
  Cell[
   BoxData[
    TemplateBox[{}, "MainGridTemplate"]], "DockedCell", 
   CellMargins -> {{-10, -10}, {-8, -8}}, CellFrame -> 0, Background -> 
   RGBColor[0.9216, 0.3412, 0.1059], CellTags -> {"MainDockedCell"}], 
  Cell[
   BoxData[
    TemplateBox[{}, "ToolsGridTemplate"]], "DockedCell", 
   TaggingRules -> {"Tools" -> True}, CellTags -> {"ToolbarDockedCell"}, 
   CellFrameMargins -> {{39, 5}, {2, 2}}, CellFrame -> {{0, 0}, {1, 0}}, 
   CellOpen -> Dynamic[
     CurrentValue[
      EvaluationNotebook[], {TaggingRules, "ToolsOpen"}, True]]]},
TaggingRules->{
 "ResourceType" -> "Function", "ResourceCreateNotebook" -> True, 
  "TemplateVersion" -> "1.3.1", "CreationTimestamp" -> 
  3.7886329842881905`17.331057525124155*^9, "UpdatedTimestamp" -> 
  3.7886329842881905`17.331057525124155*^9, "ToolsOpen" -> True, 
  "StatusMessage" -> "", "SubmissionReviewData" -> {"Review" -> False}, 
  "AttachedHints" -> {}},
CreateCellID->True,
FrontEndVersion->"12.1 for Microsoft Windows (64-bit) (January 18, 2020)",
StyleDefinitions->Notebook[{
   Cell[
    StyleData[StyleDefinitions -> "Default.nb"]], 
   Cell[
    StyleData[All, "Working"], DockedCells -> {
      Cell[
       BoxData[
        TemplateBox[{}, "MainGridTemplate"]], "DockedCell", 
       CellMargins -> {{-10, -10}, {-8, -8}}, CellFrame -> 0, Background -> 
       RGBColor[0.9216, 0.3412, 0.1059], CellTags -> {"MainDockedCell"}], 
      Cell[
       BoxData[
        TemplateBox[{}, "ToolsGridTemplate"]], "DockedCell", 
       TaggingRules -> {"Tools" -> True}, CellTags -> {"ToolbarDockedCell"}, 
       CellFrameMargins -> {{39, 5}, {2, 2}}, CellFrame -> {{0, 0}, {1, 0}}, 
       CellOpen -> Dynamic[
         CurrentValue[
          EvaluationNotebook[], {TaggingRules, "ToolsOpen"}, True]]]}, 
    AutoQuoteCharacters -> {}], 
   Cell[
    StyleData["Item"], DefaultNewCellStyle -> "Item"], 
   Cell[
    StyleData["MoreInfoText", StyleDefinitions -> StyleData["Text"]], 
    FontColor -> GrayLevel[0.25]], 
   Cell[
    StyleData["ErrorText", StyleDefinitions -> StyleData["Text"]], 
    ShowCellBracket -> False, CellMargins -> {{66, Inherited}, {10, 10}}, 
    CellElementSpacings -> {"CellMinHeight" -> 0, "ClosedCellHeight" -> 0}, 
    FontWeight -> Bold, FontColor -> RGBColor[1, 0, 0]], 
   Cell[
    StyleData["WarningText", StyleDefinitions -> StyleData["Text"]], 
    ShowCellBracket -> False, CellMargins -> {{66, 35}, {0, 0}}, FontSize -> 
    14, GridBoxOptions -> {BaseStyle -> {}}], 
   Cell[
    StyleData["ButtonText"], FontFamily -> "Sans Serif", FontSize -> 11, 
    FontWeight -> Bold, FontColor -> RGBColor[0.4588, 0.4588, 0.4588]], 
   Cell[
    StyleData["MoreInfoOpenerIconTemplate"], 
    TemplateBoxOptions -> {
     DisplayFunction -> (PaneSelectorBox[{False -> GraphicsBox[{
            Thickness[0.0909], 
            StyleBox[{
              
              JoinedCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1,
                3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData["
1:eJxTTMoPSmVmYGBgBGJJIGYC4oSnF5RuVyo58OlumvteXcQBxj//Pfjx0tkS
Dp8u+SYJzFB0MORYIxP1RMZhgZT+XRU2BTgNE4epg+nDZe6cIwobijL44Xyg
7hTr+2xw/f2HvmrE9DPAzQcp+1n3xR5mz8MqkXXuD1/Zw+yB8WH2wPgwe2D6
YfbAzIfRMHGYOpg+XOai2wtzF0w/zN0w82H+gtmDKxxg9gAARU63WA==
               "], CurveClosed -> {1}]}, {
              JoinForm[{"Miter", 3.25}], 
              Thickness[0.0458], 
              RGBColor[0.6274, 0.6274, 0.6274, 1.]}, StripOnInput -> False], 
            StyleBox[{
              
              FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1,
                 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{0, 2, 0}, {0, 1, 
                0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1,
                 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 
                0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 
                0}}}, {CompressedData["
1:eJxTTMoPSmViYGCQBGIQ3b48/JRRi4jD3qBpin2m0g5n6j32194VhvNZnvdo
vPUVdoh2sntxM0faQfiT4/m0q0IOQNnSwtvSDmxCIvbHYoQcLjHcY+L0knGQ
5n2gO0FByEEnVfJRxHUEvyM59o5bsyycz+jbwuuvLwfXrzL9/4S63XJw86+F
vdHfrS4Pt38x4x5WoSnycPe9e33AUvmUvAPM/TD+46WzjygYiML5+R9aT4Yc
FIXr/7QhIHuWuRjc/LJCoIvWisHt14zpP/T1hRjcfTA+zP0wPsx/MP0w/8PM
h4UPzH5Y+MHcBwtf9PAHAM3Qoi4=
                "], CompressedData["
1:eJxTTMoPSmViYGCQB2IQXTFnkfJOGwmHsNp125Lq2R1g/G8aMf2HvrI4KP39
VvrgjgAGH6b+c19wicp0IQf5LzlhtXoccL6BzzIut6WcaPLccP5W0d+n353k
gfM99tfKWqTzwflL9x4UV7vMD+c3FbtN+dYmAOd/2hCQPeu7IJz/KEJ8+8UD
QnC+Jsi5GcJw/uOls48ofEDw571ffsy7XATO/xEMVMEiCudffZ6l/W26qMPh
y9qpkosEHN7Os9G5cgvBXwY0bsMnMQfN0wLHd1mIOQTtkGt9fVHCAehKtvgZ
Yg5XK16qGXYg+DWJRqEGWSJwPsw/MD7MvzD+oi3mPw6l8MH5ORVVS3UO88D5
/1K/P0lU5EaYDw4QTjgfFh/o8QsASQbXkQ==
                "]}]}, {
              FaceForm[
               RGBColor[0.6274, 0.6274, 0.6274, 1.]]}, StripOnInput -> 
             False]}, ImageSize -> {11., 11.}, 
           PlotRange -> {{0., 11.}, {0., 11.}}, AspectRatio -> Automatic], 
         True -> GraphicsBox[{
            Thickness[0.0909], 
            StyleBox[{
              
              JoinedCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1,
                3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData["
1:eJxTTMoPSmVmYGBgBGJJIGYC4oSnF5RuVyo58OlumvteXcQBxj//Pfjx0tkS
Dp8u+SYJzFB0MORYIxP1RMZhgZT+XRU2BTgNE4epg+nDZe6cIwobijL44Xyg
7hTr+2xw/f2HvmrE9DPAzQcp+1n3xR5mz8MqkXXuD1/Zw+yB8WH2wPgwe2D6
YfbAzIfRMHGYOpg+XOai2wtzF0w/zN0w82H+gtmDKxxg9gAARU63WA==
               "], CurveClosed -> {1}]}, {
              JoinForm[{"Miter", 3.25}], 
              Thickness[0.0458], 
              RGBColor[0.5, 0.5, 0.5, 1.]}, StripOnInput -> False], 
            StyleBox[{
              
              FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1,
                3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData["
1:eJxTTMoPSmVmYGBgBGJJIGYC4oSnF5RuVyo58OlumvteXcQBxj//Pfjx0tkS
Dp8u+SYJzFB0MORYIxP1RMZhgZT+XRU2BTgNE4epg+nDZe6cIwobijL44Xyg
7hTr+2xw/f2HvmrE9DPAzQcp+1n3xR5mz8MqkXXuD1/Zw+yB8WH2wPgwe2D6
YfbAzIfRMHGYOpg+XOai2wtzF0w/zN0w82H+gtmDKxxg9gAARU63WA==
               "]]}, {
              FaceForm[
               RGBColor[0.5, 0.5, 0.5, 1.]]}, StripOnInput -> False], 
            StyleBox[{
              
              FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1,
                 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{0, 2, 0}, {0, 1, 
                0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1,
                 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 
                0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 
                0}}}, {CompressedData["
1:eJxTTMoPSmViYGCQBGIQ3b48/JRRi4jD3qBpin2m0g5n6j32194VhvNZnvdo
vPUVdoh2sntxM0faQfiT4/m0q0IOQNnSwtvSDmxCIvbHYoQcLjHcY+L0knGQ
5n2gO0FByEEnVfJRxHUEvyM59o5bsyycz+jbwuuvLwfXrzL9/4S63XJw86+F
vdHfrS4Pt38x4x5WoSnycPe9e33AUvmUvAPM/TD+46WzjygYiML5+R9aT4Yc
FIXr/7QhIHuWuRjc/LJCoIvWisHt14zpP/T1hRjcfTA+zP0wPsx/MP0w/8PM
h4UPzH5Y+MHcBwtf9PAHAM3Qoi4=
                "], CompressedData["
1:eJxTTMoPSmViYGCQB2IQXTFnkfJOGwmHsNp125Lq2R1g/G8aMf2HvrI4KP39
VvrgjgAGH6b+c19wicp0IQf5LzlhtXoccL6BzzIut6WcaPLccP5W0d+n353k
gfM99tfKWqTzwflL9x4UV7vMD+c3FbtN+dYmAOd/2hCQPeu7IJz/KEJ8+8UD
QnC+Jsi5GcJw/uOls48ofEDw571ffsy7XATO/xEMVMEiCudffZ6l/W26qMPh
y9qpkosEHN7Os9G5cgvBXwY0bsMnMQfN0wLHd1mIOQTtkGt9fVHCAehKtvgZ
Yg5XK16qGXYg+DWJRqEGWSJwPsw/MD7MvzD+oi3mPw6l8MH5ORVVS3UO88D5
/1K/P0lU5EaYDw4QTjgfFh/o8QsASQbXkQ==
                "]}]}, {
              FaceForm[
               RGBColor[1., 1., 1., 1.]]}, StripOnInput -> False]}, 
           ImageSize -> {11., 11.}, PlotRange -> {{0., 11.}, {0., 11.}}, 
           AspectRatio -> Automatic]}, 
        Dynamic[
         CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 
        0]& )}], 
   Cell[
    StyleData["MoreInfoOpenerButtonTemplate"], 
    TemplateBoxOptions -> {DisplayFunction -> (AdjustmentBox[
        ButtonBox[
         TemplateBox[{
           TemplateBox[{}, "MoreInfoOpenerIconTemplate"], 
           "\"Click for more information\""}, "PrettyTooltipTemplate"], 
         ButtonFunction :> (NotebookDelete[
            CurrentValue[
             ParentCell[
              EvaluationCell[]], {TaggingRules, "AttachedMoreInfoCell"}]]; If[
            And[
             MatchQ[
              CurrentValue[
               ParentCell[
                EvaluationCell[]], {TaggingRules, "AttachedMoreInfoCell"}], 
              Blank[CellObject]], CurrentValue[
               ParentCell[
                EvaluationCell[]], {
               TaggingRules, "AttachedMoreInfoTag"}] === #], CurrentValue[
               ParentCell[
                EvaluationCell[]], {TaggingRules, "AttachedMoreInfoCell"}] = 
             Inherited; CurrentValue[
               ParentCell[
                EvaluationCell[]], {TaggingRules, "AttachedMoreInfoTag"}] = 
             Inherited; Null, CurrentValue[
               ParentCell[
                EvaluationCell[]], {TaggingRules, "AttachedMoreInfoTag"}] = #; 
            CurrentValue[
               ParentCell[
                EvaluationCell[]], {TaggingRules, "AttachedMoreInfoCell"}] = 
             MathLink`CallFrontEnd[
               FrontEnd`AttachCell[
                ParentCell[
                 EvaluationCell[]], #2, "Inline", 
                "ClosingActions" -> {"ParentChanged", "EvaluatorQuit"}]]]), 
         Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], 
        BoxBaselineShift -> -0.5, BoxMargins -> 0.2]& )}], 
   Cell[
    StyleData["InlineMoreInfoOpenerButtonTemplate"], 
    TemplateBoxOptions -> {DisplayFunction -> (AdjustmentBox[
        ButtonBox[
         TemplateBox[{
           TemplateBox[{}, "MoreInfoOpenerIconTemplate"], #4}, 
          "PrettyTooltipTemplate"], ButtonFunction :> (NotebookDelete[
            CurrentValue[
             ReleaseHold[#3], {TaggingRules, "AttachedMoreInfoCell"}]]; If[
            And[
             MatchQ[
              CurrentValue[
               ReleaseHold[#3], {TaggingRules, "AttachedMoreInfoCell"}], 
              Blank[CellObject]], CurrentValue[
               ReleaseHold[#3], {TaggingRules, "AttachedMoreInfoTag"}] === #],
             CurrentValue[
               ReleaseHold[#3], {TaggingRules, "AttachedMoreInfoCell"}] = 
             Inherited; CurrentValue[
               ReleaseHold[#3], {TaggingRules, "AttachedMoreInfoTag"}] = 
             Inherited; Null, CurrentValue[
               ReleaseHold[#3], {TaggingRules, "AttachedMoreInfoTag"}] = #; 
            CurrentValue[
               ReleaseHold[#3], {TaggingRules, "AttachedMoreInfoCell"}] = 
             MathLink`CallFrontEnd[
               FrontEnd`AttachCell[
                ReleaseHold[#3], #2, "Inline", 
                "ClosingActions" -> {"ParentChanged", "EvaluatorQuit"}]]]), 
         Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], 
        BoxBaselineShift -> -0.5, BoxMargins -> 0.2]& )}], 
   Cell[
    StyleData["ClickToCopyTemplate"], 
    TemplateBoxOptions -> {
     DisplayFunction -> (PaneSelectorBox[{False -> TagBox[
           GridBox[{{#, 
              ButtonBox[
               GraphicsBox[{
                 GrayLevel[0.85], 
                 Thickness[
                  NCache[2/45, 0.0444]], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 
                   0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 
                   0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 18.}, {
                   9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 18.}, {12., 
                   18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, {16.5, 4.5}, {
                   16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, {15.75, 17.25}, {
                   15.75, 5.25}, {6.75, 5.25}, {6.75, 17.25}, {8.25, 17.25}, {
                   8.25, 18.}}, {{9.75, 17.25}, {12.75, 17.25}, {12.75, 
                   16.5}, {9.75, 16.5}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 
                  0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                  0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{8.25, 14.25}, {
                  14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{8.25, 12.}, {
                  14.25, 12.}, {14.25, 11.25}, {8.25, 11.25}}, {{8.25, 
                  9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25, 9.}}, {{8.25, 
                  7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 6.75}}}]}, 
                ImageSize -> 12], ButtonFunction :> Null, 
               Appearance -> {
                "Default" -> None, "Hover" -> None, "Pressed" -> None}, 
               Evaluator -> Automatic, Method -> "Preemptive"]}}, 
            GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Center}}},
             AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            GridBoxSpacings -> {"Columns" -> {{0.4}}}], "Grid"], True -> 
         DynamicModuleBox[{
           ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
clickTime$$ = 0., 
            ResourceSystemClientTools`BuildDefinitionNotebook`Private`timeout$\
$ = 3.}, 
           TagBox[
            GridBox[{{#, 
               TagBox[
                ButtonBox[
                 DynamicBox[
                  ToBoxes[
                   Refresh[
                    If[
                    AbsoluteTime[] - 
                    ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
clickTime$$ > 
                    ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
timeout$$, 
                    (RawBoxes[
                    TemplateBox[{
                    ToBoxes[#], 
                    ToBoxes[#2]}, "PrettyTooltipTemplate"]]& )[
                    Mouseover[
                    Graphics[{
                    GrayLevel[0.65], 
                    Thickness[2/45], 
                    
                    FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 
                    0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 
                    0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 
                    0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 
                    0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 
                    18.}, {9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 
                    18.}, {12., 18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, {
                    16.5, 4.5}, {16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, {
                    15.75, 17.25}, {15.75, 5.25}, {6.75, 5.25}, {6.75, 
                    17.25}, {8.25, 17.25}, {8.25, 18.}}, {{9.75, 17.25}, {
                    12.75, 17.25}, {12.75, 16.5}, {9.75, 16.5}}}], 
                    
                    FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 
                    0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                    0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{8.25, 
                    14.25}, {14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{
                    8.25, 12.}, {14.25, 12.}, {14.25, 11.25}, {8.25, 
                    11.25}}, {{8.25, 9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25,
                     9.}}, {{8.25, 7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 
                    6.75}}}]}, ImageSize -> 12], 
                    Graphics[{
                    RGBColor[0.9882, 0.4196, 0.2039], 
                    Thickness[2/45], 
                    
                    FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 
                    0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 
                    0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 
                    0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 
                    0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 
                    18.}, {9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 
                    18.}, {12., 18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, {
                    16.5, 4.5}, {16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, {
                    15.75, 17.25}, {15.75, 5.25}, {6.75, 5.25}, {6.75, 
                    17.25}, {8.25, 17.25}, {8.25, 18.}}, {{9.75, 17.25}, {
                    12.75, 17.25}, {12.75, 16.5}, {9.75, 16.5}}}], 
                    
                    FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 
                    0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                    0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{8.25, 
                    14.25}, {14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{
                    8.25, 12.}, {14.25, 12.}, {14.25, 11.25}, {8.25, 
                    11.25}}, {{8.25, 9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25,
                     9.}}, {{8.25, 7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 
                    6.75}}}]}, ImageSize -> 12]], 
                    "Click to copy to the clipboard"], 
                    (RawBoxes[
                    TemplateBox[{
                    ToBoxes[#], 
                    ToBoxes[#2]}, "PrettyTooltipTemplate"]]& )[
                    Graphics[{
                    RGBColor[0, 2/3, 0], 
                    Thickness[2/45], 
                    
                    FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 
                    0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 
                    0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 
                    0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 
                    0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 
                    18.}, {9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 
                    18.}, {12., 18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, {
                    16.5, 4.5}, {16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, {
                    15.75, 17.25}, {15.75, 5.25}, {6.75, 5.25}, {6.75, 
                    17.25}, {8.25, 17.25}, {8.25, 18.}}, {{9.75, 17.25}, {
                    12.75, 17.25}, {12.75, 16.5}, {9.75, 16.5}}}], 
                    
                    FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 
                    0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                    0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{8.25, 
                    14.25}, {14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{
                    8.25, 12.}, {14.25, 12.}, {14.25, 11.25}, {8.25, 
                    11.25}}, {{8.25, 9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25,
                     9.}}, {{8.25, 7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 
                    6.75}}}]}, ImageSize -> 12], "Copied"]], UpdateInterval -> 
                    1, TrackedSymbols :> {
                    ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
clickTime$$}], StandardForm], Evaluator -> "System"], 
                 ButtonFunction :> (
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
clickTime$$ = AbsoluteTime[]; CopyToClipboard[
                    BinaryDeserialize[
                    BaseDecode[#2], Defer]]), 
                 Appearance -> {
                  "Default" -> None, "Hover" -> None, "Pressed" -> None}, 
                 Method -> "Queued", Evaluator -> "System"], 
                MouseAppearanceTag["LinkHand"]]}}, 
             GridBoxAlignment -> {
              "Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> 
             False, GridBoxItemSize -> {
              "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
             GridBoxSpacings -> {"Columns" -> {{0.4}}}], "Grid"], 
           DynamicModuleValues :> {}]}, 
        Dynamic[
         CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 
        0]& )}], 
   Cell[
    StyleData["PrettyTooltipTemplate"], 
    TemplateBoxOptions -> {DisplayFunction -> (TagBox[
        TooltipBox[#, 
         FrameBox[
          
          StyleBox[#2, "Text", FontColor -> RGBColor[0.5373, 0.5373, 0.5373], 
           FontSize -> 12, FontWeight -> "Plain", FontTracking -> "Plain", 
           StripOnInput -> False], Background -> 
          RGBColor[0.9608, 0.9608, 0.9608], FrameStyle -> 
          RGBColor[0.898, 0.898, 0.898], FrameMargins -> 8, StripOnInput -> 
          False], TooltipDelay -> 0.1, 
         TooltipStyle -> {Background -> None, CellFrame -> 0}], Annotation[#, 
         Framed[
          Style[
          ResourceSystemClientTools`BuildDefinitionNotebook`Private`$$tooltip,
            "Text", FontColor -> RGBColor[0.5373, 0.5373, 0.5373], FontSize -> 
           12, FontWeight -> "Plain", FontTracking -> "Plain"], Background -> 
          RGBColor[0.9608, 0.9608, 0.9608], FrameStyle -> 
          RGBColor[0.898, 0.898, 0.898], FrameMargins -> 8], 
         "Tooltip"]& ]& )}], 
   Cell[
    StyleData["ToolsGridTemplate"], 
    TemplateBoxOptions -> {DisplayFunction -> (TagBox[
        GridBox[{{
           ButtonBox[
            TemplateBox[{
              StyleBox[
              "\"Template Input\"", "Text", FontFamily -> "Source Sans Pro", 
               FontSize -> 11, StripOnInput -> False], 
              "\"Format selection automatically using appropriate \
documentation styles\""}, "PrettyTooltipTemplate"], ButtonFunction :> 
            With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$ = ButtonNotebook[], 
               ResourceSystemClientTools`BuildDefinitionNotebook`Private`$cp$ = \
$ContextPath}, 
              Quiet[
               
               Block[{$ContextPath = 
                 ResourceSystemClientTools`BuildDefinitionNotebook`Private`$\
cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, 
                Needs["ResourceSystemClient`DefinitionNotebook`"]; 
                ResourceSystemClient`DefinitionNotebook`CheckForUpdates[
                 ResourceSystemClientTools`BuildDefinitionNotebook`Private`nb$\
, 
                  
                  ResourceSystemClient`DefinitionNotebook`DocumentationTools`\
TemplateInput[]]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> 
            Dynamic[
              FEPrivate`If[
               CurrentValue["MouseOver"], {FontColor -> GrayLevel[1]}, {
               FontColor -> RGBColor[0.8275, 0.2078, 0.]}], Evaluator -> 
              "System"], Appearance -> {"Default" -> Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQPEUCj08dhCBkQWRlQKmbsSY3g9WhKNYErhiu7NGRXTeC
1b5ePg63AsgGigDFEcoe3LsZZ/L95nk0xwBFgOJAWYhrgVpuReljdTZQHCjL
AAbEKCPSNOLdRqxPiQ43YmIBDWCNUwCVRq3x
                "], "Byte", ColorSpace -> "RGB", Interleaving -> True], 
              "Hover" -> Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQPEUCd04cgiBkQWRlQKltPjqbbcQhCMiGK4Yru3Vo92Y7
qZexWn+yTSAIyAaKAMXhyp48uLfNW+tNvDZcDQQBRYDiQFmIa4FattlJoqmB
IKA4UJYBDIhRRqRpxLuNSJ8SH27ExAIxcQoAZdNqHw==
                "], "Byte", ColorSpace -> "RGB", Interleaving -> True], 
              "Pressed" -> Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQPEUCL2EAWRBZGVDqx7vXP18+gSAgG64YruzVq1c/3zy/
m2hx2ZQBgoBsoAhQHK7s2bNnP968uB1tAFcDQUARoDhQFuJaoJYfj++gqYEg
oDhQlgEMiFFGpGnEu41InxIfbsTEAjFxCgDlLITg
                "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, 
            Background -> GrayLevel[0.9], Method -> "Queued", 
            ImageSize -> {All, 20}, Evaluator -> Automatic], 
           ButtonBox[
            TemplateBox[{
              StyleBox[
              "\"Literal Input\"", "Text", FontFamily -> "Source Sans Pro", 
               FontSize -> 11, StripOnInput -> False], 
              "\"Format selection as literal Wolfram Language code\""}, 
             "PrettyTooltipTemplate"], ButtonFunction :> 
            With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$ = ButtonNotebook[], 
               ResourceSystemClientTools`BuildDefinitionNotebook`Private`$cp$ = \
$ContextPath}, 
              Quiet[
               
               Block[{$ContextPath = 
                 ResourceSystemClientTools`BuildDefinitionNotebook`Private`$\
cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, 
                Needs["ResourceSystemClient`DefinitionNotebook`"]; 
                ResourceSystemClient`DefinitionNotebook`CheckForUpdates[
                 ResourceSystemClientTools`BuildDefinitionNotebook`Private`nb$\
, 
                  
                  ResourceSystemClient`DefinitionNotebook`DocumentationTools`\
LiteralInput[]]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> 
            Dynamic[
              FEPrivate`If[
               CurrentValue["MouseOver"], {FontColor -> GrayLevel[1]}, {
               FontColor -> RGBColor[0.8275, 0.2078, 0.]}], Evaluator -> 
              "System"], Appearance -> {"Default" -> Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQPEUCj08dhCBkQWRlQKmbsSY3g9WhKNYErhiu7NGRXTeC
1b5ePg63AsgGigDFEcoe3LsZZ/L95nk0xwBFgOJAWYhrgVpuReljdTZQHCjL
AAbEKCPSNOLdRqxPiQ43YmIBDWCNUwCVRq3x
                "], "Byte", ColorSpace -> "RGB", Interleaving -> True], 
              "Hover" -> Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQPEUCd04cgiBkQWRlQKltPjqbbcQhCMiGK4Yru3Vo92Y7
qZexWn+yTSAIyAaKAMXhyp48uLfNW+tNvDZcDQQBRYDiQFmIa4FattlJoqmB
IKA4UJYBDIhRRqRpxLuNSJ8SH27ExAIxcQoAZdNqHw==
                "], "Byte", ColorSpace -> "RGB", Interleaving -> True], 
              "Pressed" -> Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQPEUCL2EAWRBZGVDqx7vXP18+gSAgG64YruzVq1c/3zy/
m2hx2ZQBgoBsoAhQHK7s2bNnP968uB1tAFcDQUARoDhQFuJaoJYfj++gqYEg
oDhQlgEMiFFGpGnEu41InxIfbsTEAjFxCgDlLITg
                "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, 
            Background -> GrayLevel[0.9], Method -> "Queued", 
            ImageSize -> {All, 20}, Evaluator -> Automatic], 
           ButtonBox[
            TemplateBox[{
              StyleBox[
              "\"Insert Delimiter\"", "Text", FontFamily -> "Source Sans Pro",
                FontSize -> 11, StripOnInput -> False], 
              "\"Insert example delimiter\""}, "PrettyTooltipTemplate"], 
            ButtonFunction :> 
            With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$ = ButtonNotebook[], 
               ResourceSystemClientTools`BuildDefinitionNotebook`Private`$cp$ = \
$ContextPath}, 
              Quiet[
               
               Block[{$ContextPath = 
                 ResourceSystemClientTools`BuildDefinitionNotebook`Private`$\
cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, 
                Needs["ResourceSystemClient`DefinitionNotebook`"]; 
                ResourceSystemClient`DefinitionNotebook`CheckForUpdates[
                 ResourceSystemClientTools`BuildDefinitionNotebook`Private`nb$\
, 
                  
                  ResourceSystemClient`DefinitionNotebook`DocumentationTools`\
DelimiterInsert[]]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> 
            Dynamic[
              FEPrivate`If[
               CurrentValue["MouseOver"], {FontColor -> GrayLevel[1]}, {
               FontColor -> RGBColor[0.8275, 0.2078, 0.]}], Evaluator -> 
              "System"], Appearance -> {"Default" -> Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQPEUCj08dhCBkQWRlQKmbsSY3g9WhKNYErhiu7NGRXTeC
1b5ePg63AsgGigDFEcoe3LsZZ/L95nk0xwBFgOJAWYhrgVpuReljdTZQHCjL
AAbEKCPSNOLdRqxPiQ43YmIBDWCNUwCVRq3x
                "], "Byte", ColorSpace -> "RGB", Interleaving -> True], 
              "Hover" -> Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQPEUCd04cgiBkQWRlQKltPjqbbcQhCMiGK4Yru3Vo92Y7
qZexWn+yTSAIyAaKAMXhyp48uLfNW+tNvDZcDQQBRYDiQFmIa4FattlJoqmB
IKA4UJYBDIhRRqRpxLuNSJ8SH27ExAIxcQoAZdNqHw==
                "], "Byte", ColorSpace -> "RGB", Interleaving -> True], 
              "Pressed" -> Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQPEUCL2EAWRBZGVDqx7vXP18+gSAgG64YruzVq1c/3zy/
m2hx2ZQBgoBsoAhQHK7s2bNnP968uB1tAFcDQUARoDhQFuJaoJYfj++gqYEg
oDhQlgEMiFFGpGnEu41InxIfbsTEAjFxCgDlLITg
                "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, 
            Background -> GrayLevel[0.9], Method -> "Queued", 
            ImageSize -> {All, 20}, Evaluator -> Automatic], 
           ButtonBox[
            TemplateBox[{
              StyleBox[
              "\"Subscripted Variable\"", "Text", FontFamily -> 
               "Source Sans Pro", FontSize -> 11, StripOnInput -> False], 
              "\"Insert subscripted variable placeholder\""}, 
             "PrettyTooltipTemplate"], ButtonFunction :> 
            With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$ = ButtonNotebook[], 
               ResourceSystemClientTools`BuildDefinitionNotebook`Private`$cp$ = \
$ContextPath}, 
              Quiet[
               
               Block[{$ContextPath = 
                 ResourceSystemClientTools`BuildDefinitionNotebook`Private`$\
cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, 
                Needs["ResourceSystemClient`DefinitionNotebook`"]; 
                ResourceSystemClient`DefinitionNotebook`CheckForUpdates[
                 ResourceSystemClientTools`BuildDefinitionNotebook`Private`nb$\
, 
                  
                  ResourceSystemClient`DefinitionNotebook`DocumentationTools`\
SubscriptInsert[]]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> 
            Dynamic[
              FEPrivate`If[
               CurrentValue["MouseOver"], {FontColor -> GrayLevel[1]}, {
               FontColor -> RGBColor[0.8275, 0.2078, 0.]}], Evaluator -> 
              "System"], Appearance -> {"Default" -> Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQPEUCj08dhCBkQWRlQKmbsSY3g9WhKNYErhiu7NGRXTeC
1b5ePg63AsgGigDFEcoe3LsZZ/L95nk0xwBFgOJAWYhrgVpuReljdTZQHCjL
AAbEKCPSNOLdRqxPiQ43YmIBDWCNUwCVRq3x
                "], "Byte", ColorSpace -> "RGB", Interleaving -> True], 
              "Hover" -> Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQPEUCd04cgiBkQWRlQKltPjqbbcQhCMiGK4Yru3Vo92Y7
qZexWn+yTSAIyAaKAMXhyp48uLfNW+tNvDZcDQQBRYDiQFmIa4FattlJoqmB
IKA4UJYBDIhRRqRpxLuNSJ8SH27ExAIxcQoAZdNqHw==
                "], "Byte", ColorSpace -> "RGB", Interleaving -> True], 
              "Pressed" -> Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQPEUCL2EAWRBZGVDqx7vXP18+gSAgG64YruzVq1c/3zy/
m2hx2ZQBgoBsoAhQHK7s2bNnP968uB1tAFcDQUARoDhQFuJaoJYfj++gqYEg
oDhQlgEMiFFGpGnEu41InxIfbsTEAjFxCgDlLITg
                "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, 
            Background -> GrayLevel[0.9], Method -> "Queued", 
            ImageSize -> {All, 20}, Evaluator -> Automatic], 
           ActionMenuBox[
            ButtonBox[
             TemplateBox[{
               StyleBox[
               "\"Tables\[ThinSpace]\[ThinSpace]\[ThinSpace]\
\[FilledDownTriangle]\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 
                11, StripOnInput -> False], "\"Table functions\""}, 
              "PrettyTooltipTemplate"], ButtonFunction :> 
             With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$ = ButtonNotebook[], 
                ResourceSystemClientTools`BuildDefinitionNotebook`Private`$cp$\
 = $ContextPath}, 
               Quiet[
                
                Block[{$ContextPath = 
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`$\
cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, 
                 CurrentValue[
                   ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, {TaggingRules, "StatusMessage"}] = 
                  ProgressIndicator[Appearance -> "Necklace"]; 
                 Needs["ResourceSystemClient`DefinitionNotebook`"]; 
                 ResourceSystemClient`DefinitionNotebook`CheckForUpdates[
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, Null]; CurrentValue[
                   ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, {TaggingRules, "StatusMessage"}] = ""; Null]]], 
             FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[
               FEPrivate`If[
                CurrentValue["MouseOver"], {FontColor -> GrayLevel[1]}, {
                FontColor -> RGBColor[0.8275, 0.2078, 0.]}], Evaluator -> 
               "System"], Appearance -> {"Default" -> Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQPEUCj08dhCBkQWRlQKmbsSY3g9WhKNYErhiu7NGRXTeC
1b5ePg63AsgGigDFEcoe3LsZZ/L95nk0xwBFgOJAWYhrgVpuReljdTZQHCjL
AAbEKCPSNOLdRqxPiQ43YmIBDWCNUwCVRq3x
                 "], "Byte", ColorSpace -> "RGB", Interleaving -> True], 
               "Hover" -> Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQPEUCd04cgiBkQWRlQKltPjqbbcQhCMiGK4Yru3Vo92Y7
qZexWn+yTSAIyAaKAMXhyp48uLfNW+tNvDZcDQQBRYDiQFmIa4FattlJoqmB
IKA4UJYBDIhRRqRpxLuNSJ8SH27ExAIxcQoAZdNqHw==
                 "], "Byte", ColorSpace -> "RGB", Interleaving -> True], 
               "Pressed" -> Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQPEUCL2EAWRBZGVDqx7vXP18+gSAgG64YruzVq1c/3zy/
m2hx2ZQBgoBsoAhQHK7s2bNnP968uB1tAFcDQUARoDhQFuJaoJYfj++gqYEg
oDhQlgEMiFFGpGnEu41InxIfbsTEAjFxCgDlLITg
                 "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, 
             Background -> GrayLevel[0.9], Method -> "Queued", 
             ImageSize -> {All, 20}, Evaluator -> Automatic], {
            "\"Insert table with two columns\"" :> 
             With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$ = InputNotebook[], 
                ResourceSystemClientTools`BuildDefinitionNotebook`Private`$cp$\
 = $ContextPath}, 
               Quiet[
                
                Block[{$ContextPath = 
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`$\
cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, 
                 Needs["ResourceSystemClient`DefinitionNotebook`"]; 
                 ResourceSystemClient`DefinitionNotebook`CheckForUpdates[
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, 
                   
                   ResourceSystemClient`DefinitionNotebook`DocumentationTools`\
TableInsert[2]]; Null]]], "\"Insert table with three columns\"" :> 
             With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$ = InputNotebook[], 
                ResourceSystemClientTools`BuildDefinitionNotebook`Private`$cp$\
 = $ContextPath}, 
               Quiet[
                
                Block[{$ContextPath = 
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`$\
cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, 
                 Needs["ResourceSystemClient`DefinitionNotebook`"]; 
                 ResourceSystemClient`DefinitionNotebook`CheckForUpdates[
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, 
                   
                   ResourceSystemClient`DefinitionNotebook`DocumentationTools`\
TableInsert[3]]; Null]]], "\"Add a row to the selected table\"" :> 
             With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$ = InputNotebook[], 
                ResourceSystemClientTools`BuildDefinitionNotebook`Private`$cp$\
 = $ContextPath}, 
               Quiet[
                
                Block[{$ContextPath = 
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`$\
cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, 
                 Needs["ResourceSystemClient`DefinitionNotebook`"]; 
                 ResourceSystemClient`DefinitionNotebook`CheckForUpdates[
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, 
                   
                   ResourceSystemClient`DefinitionNotebook`DocumentationTools`\
TableRowInsert[]]; Null]]], "\"Sort the selected table\"" :> 
             With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$ = InputNotebook[], 
                ResourceSystemClientTools`BuildDefinitionNotebook`Private`$cp$\
 = $ContextPath}, 
               Quiet[
                
                Block[{$ContextPath = 
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`$\
cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, 
                 Needs["ResourceSystemClient`DefinitionNotebook`"]; 
                 ResourceSystemClient`DefinitionNotebook`CheckForUpdates[
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, 
                   
                   ResourceSystemClient`DefinitionNotebook`DocumentationTools`\
TableSort[]]; Null]]], "\"Merge selected tables\"" :> 
             With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$ = InputNotebook[], 
                ResourceSystemClientTools`BuildDefinitionNotebook`Private`$cp$\
 = $ContextPath}, 
               Quiet[
                
                Block[{$ContextPath = 
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`$\
cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, 
                 Needs["ResourceSystemClient`DefinitionNotebook`"]; 
                 ResourceSystemClient`DefinitionNotebook`CheckForUpdates[
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, 
                   
                   ResourceSystemClient`DefinitionNotebook`DocumentationTools`\
TableMerge[]]; Null]]]}, Appearance -> None, Method -> "Queued"], 
           ButtonBox[
            TemplateBox[{
              StyleBox[
              "\"Insert Comment\"", "Text", FontFamily -> "Source Sans Pro", 
               FontSize -> 11, StripOnInput -> False], 
              "\"Insert comment for reviewer\""}, "PrettyTooltipTemplate"], 
            ButtonFunction :> 
            With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$ = ButtonNotebook[], 
               ResourceSystemClientTools`BuildDefinitionNotebook`Private`$cp$ = \
$ContextPath}, 
              Quiet[
               
               Block[{$ContextPath = 
                 ResourceSystemClientTools`BuildDefinitionNotebook`Private`$\
cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, 
                Needs["ResourceSystemClient`DefinitionNotebook`"]; 
                ResourceSystemClient`DefinitionNotebook`CheckForUpdates[
                 ResourceSystemClientTools`BuildDefinitionNotebook`Private`nb$\
, 
                  
                  ResourceSystemClient`DefinitionNotebook`DocumentationTools`\
CommentInsert[]]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> 
            Dynamic[
              FEPrivate`If[
               CurrentValue["MouseOver"], {FontColor -> GrayLevel[1]}, {
               FontColor -> RGBColor[0.8275, 0.2078, 0.]}], Evaluator -> 
              "System"], Appearance -> {"Default" -> Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQPEUCj08dhCBkQWRlQKmbsSY3g9WhKNYErhiu7NGRXTeC
1b5ePg63AsgGigDFEcoe3LsZZ/L95nk0xwBFgOJAWYhrgVpuReljdTZQHCjL
AAbEKCPSNOLdRqxPiQ43YmIBDWCNUwCVRq3x
                "], "Byte", ColorSpace -> "RGB", Interleaving -> True], 
              "Hover" -> Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQPEUCd04cgiBkQWRlQKltPjqbbcQhCMiGK4Yru3Vo92Y7
qZexWn+yTSAIyAaKAMXhyp48uLfNW+tNvDZcDQQBRYDiQFmIa4FattlJoqmB
IKA4UJYBDIhRRqRpxLuNSJ8SH27ExAIxcQoAZdNqHw==
                "], "Byte", ColorSpace -> "RGB", Interleaving -> True], 
              "Pressed" -> Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQPEUCL2EAWRBZGVDqx7vXP18+gSAgG64YruzVq1c/3zy/
m2hx2ZQBgoBsoAhQHK7s2bNnP968uB1tAFcDQUARoDhQFuJaoJYfj++gqYEg
oDhQlgEMiFFGpGnEu41InxIfbsTEAjFxCgDlLITg
                "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, 
            Background -> GrayLevel[0.9], Method -> "Queued", 
            ImageSize -> {All, 20}, Evaluator -> Automatic]}}, 
         GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Center}}}, 
         AutoDelete -> False, 
         GridBoxBackground -> {"Columns" -> {{None}}, "Rows" -> {
             GrayLevel[0.9]}}, 
         GridBoxFrame -> {
          "Columns" -> False, "RowsIndexed" -> {1 -> GrayLevel[0.9]}}, 
         GridBoxItemSize -> {
          "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
         GridBoxSpacings -> {
          "ColumnsIndexed" -> {1 -> 0, -1 -> 0}, "Rows" -> {{Automatic}}}, 
         FrameStyle -> GrayLevel[0.75]], "Grid"]& )}], 
   Cell[
    StyleData["MainGridTemplate"], 
    TemplateBoxOptions -> {DisplayFunction -> (TagBox[
        GridBox[{{
           TagBox[
            GridBox[{{
               GraphicsBox[{
                 Thickness[0.0222], {
                  FaceForm[{
                    RGBColor[0.8745, 0.2784, 0.0314], 
                    Opacity[1.]}], 
                  
                  FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                   3}}}, {{{45., 22.5}, {45., 10.074}, {34.926, 0.}, {22.5, 
                   0.}, {10.074, 0.}, {0., 10.074}, {0., 22.5}, {0., 
                   34.926}, {10.074, 45.}, {22.5, 45.}, {34.926, 45.}, {45., 
                   34.926}, {45., 22.5}}}]}, {
                  FaceForm[{
                    RGBColor[1., 1., 1.], 
                    Opacity[1.]}], 
                  
                  FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                    3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                    3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 
                    3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                    0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 
                    0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 
                    3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{0, 2, 0}, {1, 3, 
                    3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                    0}, {1, 3, 3}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 
                    3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {CompressedData["
1:eJxTTMoPSmViYGAwAWIQLckSxqe7SdlhmnN3zvPblg4w/smyffOl/K0cEp5e
ULq9U9lhT8lkCZZrVg6VL9UMOd4oO1SLrHN/GGXtcLUCKOCh4sDDpN0udtPa
4fnvlR8v8ao6ZIE12ELMrVZzAHLC+HjtHICGz32fruGQC1Zo57BASv+uCpsW
RP9Me4g9YjoQe3gcHICqlx/z1nNgAAEFB4j6Y/oOQMvOfVd2gLhjlgGEz+zg
oBnTf+irhiFEfw/UvDJDiP2+9g7qhhxrZGYZQtS9sHP48vdKxcs2Q4i72u0c
pEHOSTSEuxfsTiFDiPhCWwcXoHd+rzRwWOS67fPfEFuHx0tnH1EoMHDYUJQx
8a2MrUPQDrnW14IGUPfaOnzTAFq0VR8aXrYOoFA6V64HcccvWwfTuF2ePEy6
UPPtHIC+CH68VBvOP70QaNFeLTg/X6j5wKlELYdPl3yTBCLsIP7U0YK49y3U
PR80HQJ6p+cJHbaB88HqZ1jD1QNdUyWSZwWJH2stiHtuWcLdC+ND4lvfwbzT
MeHpBEt4+IPld1lA4p9DH+LuVgu4eeh8sH18hnA+2J6velB3aUHSyxE9iP8U
9aDpBMH3A/rWskQHYt8JBQw+TD0kPpTh5sHSMzgd/0TwYe6B8WHulY1Ksb7f
rwDng+PHSQES31csIPF7UREePgCOg02w
                    "], {{19.051, 14.242}, {19.051, 27.594}, {23.828, 
                    27.594}, {23.828, 26.543}, {21.426, 26.309}, {21.375, 
                    26.258}, {21.375, 24.219}, {21.375, 17.535}, {21.375, 
                    15.602}, {21.426, 15.547}, {23.828, 15.316}, {23.828, 
                    14.242}}, {{24.578, 18.75}, {24.578, 23.078}, {24.578, 
                    23.539}, {24.953, 23.914}, {25.418, 23.91}, {29.746, 
                    23.91}, {30.203, 23.91}, {30.578, 23.539}, {30.578, 
                    23.078}, {30.578, 18.75}, {30.582, 18.289}, {30.207, 
                    17.91}, {29.746, 17.91}, {25.418, 17.91}, {24.953, 
                    17.906}, {24.574, 18.285}, {24.578, 18.75}}, {{31.328, 
                    14.242}, {31.328, 15.316}, {33.684, 15.539}, {33.789, 
                    15.602}, {33.789, 17.641}, {33.789, 24.188}, {33.789, 
                    26.227}, {33.684, 26.281}, {31.328, 26.512}, {31.328, 
                    27.586}, {36.113, 27.586}, {36.113, 14.234}}}]}}, {
                ImageSize -> {Automatic, 32}, 
                 ImagePadding -> {{5, 0}, {0, 0}}, BaselinePosition -> 
                 Scaled[0.25], AspectRatio -> Automatic, Background -> 
                 RGBColor[0.9882, 0.4196, 0.2039], ImageSize -> {45., 45.}, 
                 PlotRange -> {{0., 45.}, {0., 45.}}}], 
               StyleBox[
                TagBox[
                 GridBox[{{
                    StyleBox[
                    "\"Function Resource\"", FontFamily -> "Source Sans Pro", 
                    FontWeight -> "SemiBold", StripOnInput -> False], 
                    StyleBox[
                    "\"DEFINITION NOTEBOOK\"", FontFamily -> 
                    "Source Sans Pro", FontTracking -> "SemiCondensed", 
                    FontVariations -> {"CapsType" -> "AllSmallCaps"}, 
                    StripOnInput -> False]}}, 
                  GridBoxAlignment -> {
                   "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> 
                  False, GridBoxDividers -> {
                   "ColumnsIndexed" -> {2 -> GrayLevel[1]}, 
                    "Rows" -> {{None}}}, 
                  GridBoxItemSize -> {
                   "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], 
                 "Grid"], FontSize -> 24, FontColor -> GrayLevel[1], 
                StripOnInput -> False]}}, 
             GridBoxAlignment -> {
              "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> 
             False, GridBoxItemSize -> {
              "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], 
           "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", 
           "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", 
           "\[SpanFromLeft]", 
           ItemBox[
            TemplateBox[{
              StyleBox[
              "\"Function Repository \[RightGuillemet]  \"", "Text", 
               FontColor -> GrayLevel[1], StripOnInput -> False], 
              "https://resources.wolframcloud.com/FunctionRepository"}, 
             "HyperlinkURL"], Alignment -> {Right, Bottom}, StripOnInput -> 
            False]}, {
           TemplateBox[{
             
             TemplateBox[{
              "\"Open Sample\"", 
               "\"View a completed sample definition notebook\""}, 
              "PrettyTooltipTemplate"], 
             ResourceSystemClient`DefinitionNotebook`ViewExampleNotebook[
              ButtonNotebook[]]& , 
             "\"View a completed sample definition notebook\"", False}, 
            "OrangeButtonTemplate"], 
           TemplateBox[{
             
             TemplateBox[{
              "\"Style Guidelines\"", 
               "\"View general guidelines for authoring resource \
functions\""}, "PrettyTooltipTemplate"], 
             ResourceSystemClient`DefinitionNotebook`ViewStyleGuidelines[
              ButtonNotebook[]]& , 
             "\"View general guidelines for authoring resource functions\"", 
             False}, "OrangeButtonTemplate"], 
           TemplateBox[{
             TemplateBox[{
               TagBox[
                GridBox[{{"\"Tools\"", 
                   PaneSelectorBox[{False -> GraphicsBox[{
                    GrayLevel[1], 
                    AbsoluteThickness[1], 
                    LineBox[{{-1, -1}, {-1, 1}, {1, 1}, {1, -1}, {-1, -1}}], 
                    LineBox[{{0., 0.65}, {0., -0.65}}], 
                    LineBox[{{-0.65, 0.}, {0.65, 0.}}]}, ImageSize -> 10, 
                    PlotRangePadding -> None, Background -> None], True -> 
                    GraphicsBox[{
                    GrayLevel[1], 
                    AbsoluteThickness[1], 
                    LineBox[{{-1, -1}, {-1, 1}, {1, 1}, {1, -1}, {-1, -1}}], 
                    LineBox[{{-0.65, 0.}, {0.65, 0.}}]}, ImageSize -> 10, 
                    PlotRangePadding -> None, Background -> None]}, 
                    Dynamic[
                    CurrentValue[
                    EvaluationNotebook[], {TaggingRules, "ToolsOpen"}, True]],
                     BaselinePosition -> Scaled[0.1]]}}, 
                 GridBoxAlignment -> {
                  "Columns" -> {{Automatic}}, "Rows" -> {{Baseline}}}, 
                 AutoDelete -> False, 
                 GridBoxItemSize -> {
                  "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
                 GridBoxSpacings -> {"Columns" -> {{0.35}}}], "Grid"], 
               "\"Toggle documentation toolbar\""}, "PrettyTooltipTemplate"], 
             ResourceSystemClient`DefinitionNotebook`ToggleToolbar[
              ButtonNotebook[]]& , "\"Toggle documentation toolbar\"", False},
             "OrangeButtonTemplate"], 
           TagBox[
            
            GridBox[{{"\"\"", "\"\""}}, 
             GridBoxAlignment -> {
              "Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> 
             False, GridBoxDividers -> {
              "ColumnsIndexed" -> {2 -> True}, "Rows" -> {{False}}}, 
             GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{2}}},
              GridBoxSpacings -> {"Columns" -> {{0.5}}}, FrameStyle -> 
             RGBColor[0.9941, 0.7098, 0.602]], "Grid"], 
           TemplateBox[{
             
             TemplateBox[{
              "\"Check\"", "\"Check notebook for potential errors\""}, 
              "PrettyTooltipTemplate"], 
             ResourceSystemClient`DefinitionNotebook`CheckDefinitionNotebook[
              ButtonNotebook[]]& , "\"Check notebook for potential errors\"", 
             False}, "OrangeButtonTemplate"], 
           ActionMenuBox[
            
            TemplateBox[{
             "\"Preview \[FilledDownTriangle]\"", Null& , "\"\"", True}, 
             "OrangeButtonTemplate"], {
            "\"In a notebook\"" :> 
             With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$ = InputNotebook[], 
                ResourceSystemClientTools`BuildDefinitionNotebook`Private`$cp$\
 = $ContextPath}, 
               Quiet[
                
                Block[{$ContextPath = 
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`$\
cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, 
                 CurrentValue[
                   ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, {TaggingRules, "StatusMessage"}] = 
                  ProgressIndicator[Appearance -> "Necklace"]; 
                 Needs["ResourceSystemClient`DefinitionNotebook`"]; 
                 ResourceSystemClient`DefinitionNotebook`CheckForUpdates[
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, 
                   ResourceSystemClient`DefinitionNotebook`PreviewResource[
                    ButtonNotebook[], "Notebook"]]; 
                 CurrentValue[
                   ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, {TaggingRules, "StatusMessage"}] = ""; Null]]], "\"On the cloud\"" :> 
             With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$ = InputNotebook[], 
                ResourceSystemClientTools`BuildDefinitionNotebook`Private`$cp$\
 = $ContextPath}, 
               Quiet[
                
                Block[{$ContextPath = 
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`$\
cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, 
                 CurrentValue[
                   ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, {TaggingRules, "StatusMessage"}] = 
                  ProgressIndicator[Appearance -> "Necklace"]; 
                 Needs["ResourceSystemClient`DefinitionNotebook`"]; 
                 ResourceSystemClient`DefinitionNotebook`CheckForUpdates[
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, 
                   ResourceSystemClient`DefinitionNotebook`PreviewResource[
                    ButtonNotebook[], "Cloud"]]; 
                 CurrentValue[
                   ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, {TaggingRules, "StatusMessage"}] = ""; Null]]]}, Appearance -> None, 
            Method -> "Queued"], 
           ActionMenuBox[
            
            TemplateBox[{
             "\"Deploy \[FilledDownTriangle]\"", Null& , "\"\"", True}, 
             "OrangeButtonTemplate"], {
            "\"Locally on this computer\"" :> 
             With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$ = InputNotebook[], 
                ResourceSystemClientTools`BuildDefinitionNotebook`Private`$cp$\
 = $ContextPath}, 
               Quiet[
                
                Block[{$ContextPath = 
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`$\
cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, 
                 CurrentValue[
                   ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, {TaggingRules, "StatusMessage"}] = 
                  ProgressIndicator[Appearance -> "Necklace"]; 
                 Needs["ResourceSystemClient`DefinitionNotebook`"]; 
                 ResourceSystemClient`DefinitionNotebook`CheckForUpdates[
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, 
                   ResourceSystemClient`DefinitionNotebook`DisplayStripe[
                    ButtonNotebook[], 
                    ResourceSystemClient`DefinitionNotebook`DeployResource[
                    ButtonNotebook[], "Local"]]]; 
                 CurrentValue[
                   ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, {TaggingRules, "StatusMessage"}] = ""; Null]]], 
             "\"For my cloud account\"" :> 
             With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$ = InputNotebook[], 
                ResourceSystemClientTools`BuildDefinitionNotebook`Private`$cp$\
 = $ContextPath}, 
               Quiet[
                
                Block[{$ContextPath = 
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`$\
cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, 
                 CurrentValue[
                   ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, {TaggingRules, "StatusMessage"}] = 
                  ProgressIndicator[Appearance -> "Necklace"]; 
                 Needs["ResourceSystemClient`DefinitionNotebook`"]; 
                 ResourceSystemClient`DefinitionNotebook`CheckForUpdates[
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, 
                   ResourceSystemClient`DefinitionNotebook`DisplayStripe[
                    ButtonNotebook[], 
                    ResourceSystemClient`DefinitionNotebook`DeployResource[
                    ButtonNotebook[], "CloudPrivate"]]]; 
                 CurrentValue[
                   ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, {TaggingRules, "StatusMessage"}] = ""; Null]]], 
             "\"Publicly in the cloud\"" :> 
             With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$ = InputNotebook[], 
                ResourceSystemClientTools`BuildDefinitionNotebook`Private`$cp$\
 = $ContextPath}, 
               Quiet[
                
                Block[{$ContextPath = 
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`$\
cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, 
                 CurrentValue[
                   ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, {TaggingRules, "StatusMessage"}] = 
                  ProgressIndicator[Appearance -> "Necklace"]; 
                 Needs["ResourceSystemClient`DefinitionNotebook`"]; 
                 ResourceSystemClient`DefinitionNotebook`CheckForUpdates[
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, 
                   ResourceSystemClient`DefinitionNotebook`DisplayStripe[
                    ButtonNotebook[], 
                    ResourceSystemClient`DefinitionNotebook`DeployResource[
                    ButtonNotebook[], "CloudPublic"]]]; 
                 CurrentValue[
                   ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, {TaggingRules, "StatusMessage"}] = ""; Null]]], 
             "\"In this session only (without documentation)\"" :> 
             With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$ = InputNotebook[], 
                ResourceSystemClientTools`BuildDefinitionNotebook`Private`$cp$\
 = $ContextPath}, 
               Quiet[
                
                Block[{$ContextPath = 
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`$\
cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, 
                 CurrentValue[
                   ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, {TaggingRules, "StatusMessage"}] = 
                  ProgressIndicator[Appearance -> "Necklace"]; 
                 Needs["ResourceSystemClient`DefinitionNotebook`"]; 
                 ResourceSystemClient`DefinitionNotebook`CheckForUpdates[
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, 
                   ResourceSystemClient`DefinitionNotebook`DisplayStripe[
                    ButtonNotebook[], 
                    ResourceSystemClient`DefinitionNotebook`DeployResource[
                    ButtonNotebook[], "KernelSession"]]]; 
                 CurrentValue[
                   ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb$, {TaggingRules, "StatusMessage"}] = ""; Null]]]}, Appearance -> None, 
            Method -> "Queued"], 
           ItemBox[
            StyleBox[
             DynamicBox[
              ToBoxes[
               CurrentValue[
                EvaluationNotebook[], {TaggingRules, "StatusMessage"}, ""], 
               StandardForm], Evaluator -> "System", 
              Initialization :> (CurrentValue[
                 EvaluationNotebook[], {TaggingRules, "StatusMessage"}] = 
               "")], "Text", 
             GrayLevel[1], StripOnInput -> False], ItemSize -> Fit, 
            StripOnInput -> False], 
           DynamicBox[
            ToBoxes[
             If[
              CurrentValue[
               EvaluationNotebook[], {
               TaggingRules, "SubmissionReviewData", "Review"}, False], 
              RawBoxes[
               TemplateBox[{
                 TemplateBox[{
                   TagBox[
                    GridBox[{{
                    GraphicsBox[{
                    Thickness[0.0635], 
                    StyleBox[{
                    
                    FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2,
                     0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                    0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1,
                     0}, {0, 1, 0}}}, CompressedData["
1:eJxTTMoPSmVmYGBgBWIWIGZigIEX9mCqQd8Bwv+Bnc/A54CiHs5HV6/ngJUP
p2HmwdTp4FCHTvOhqYfZrw2lhdDk0fno6tHcD1PPwOSAnY+uns8BAE8cGz4=

                    "]]}, {
                    FaceForm[
                    RGBColor[0.9608, 0.7059, 0.498, 1.]]}, StripOnInput -> 
                    False], 
                    StyleBox[{
                    
                    FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2,
                     0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                    0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1,
                     0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 
                    2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData["
1:eJxTTMoPSmVmYGBgB2IWIGZigAEJBwjNB6EblHHwX9ijqofxoeoYhKC0Bg4+
Hw4apk4Uap8aDr4QDhqqDu4uVRx8URw0TJ001D5lHHwJHDRUHYMclFbCwZfG
QUPVNSjgp+HmIWgAG/wcEg==
                    "]], 
                    
                    FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2,
                     0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                    0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1,
                     0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 
                    2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 
                    1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0,
                     1, 0}, {0, 1, 0}}}, CompressedData["
1:eJx10EEKgCAQhWGpFtEyEAYGggQj6RKeoSMErbuCR0/IWfTgCcPwy7fR9XrO
u3fOTXWGOp2zM+ZvH2170nv+e2sFH0ijt45/XxJp9NgRPHYAb63kHhu9tf2H
eU8aPfbS9kxawAvxnrSCx3c3XzbS6JX4RFrAS34B53ckaw==
                    "]]}, {
                    FaceForm[
                    RGBColor[1., 1., 1., 1.]]}, StripOnInput -> False]}, 
                    ImageSize -> 15, PlotRange -> {{0., 15.75}, {0., 16.5}}, 
                    AspectRatio -> 1.15], "\"Submit Update\""}}, 
                    GridBoxAlignment -> {
                    "Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> 
                    False, GridBoxItemSize -> {
                    "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
                    GridBoxSpacings -> {
                    "Columns" -> {{0}}, "ColumnsIndexed" -> {2 -> 0.5}, 
                    "Rows" -> {{0}}}], "Grid"], 
                   "\"Submit changes to update your resource submission\""}, 
                  "PrettyTooltipTemplate"], 
                 With[{ResourceSystemClientTools`BuildDefinitionNotebook`\
Private`nb = ButtonNotebook[]}, 
                  ResourceSystemClient`DefinitionNotebook`DisplayStripe[
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb, 
                   
                   ResourceSystemClient`DefinitionNotebook`\
SubmitRepositoryUpdate[
                   ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb], "ShowProgress" -> True]]& , 
                 "\"Submit changes to update your resource submission\"", 
                 True}, "OrangeButtonTemplate"]], 
              RawBoxes[
               TemplateBox[{
                 TemplateBox[{
                   TagBox[
                    GridBox[{{
                    GraphicsBox[{
                    Thickness[0.0635], 
                    StyleBox[{
                    
                    FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2,
                     0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                    0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1,
                     0}, {0, 1, 0}}}, CompressedData["
1:eJxTTMoPSmVmYGBgBWIWIGZigIEX9mCqQd8Bwv+Bnc/A54CiHs5HV6/ngJUP
p2HmwdTp4FCHTvOhqYfZrw2lhdDk0fno6tHcD1PPwOSAnY+uns8BAE8cGz4=

                    "]]}, {
                    FaceForm[
                    RGBColor[0.9608, 0.7059, 0.498, 1.]]}, StripOnInput -> 
                    False], 
                    StyleBox[{
                    
                    FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2,
                     0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                    0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1,
                     0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 
                    2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData["
1:eJxTTMoPSmVmYGBgB2IWIGZigAEJBwjNB6EblHHwX9ijqofxoeoYhKC0Bg4+
Hw4apk4Uap8aDr4QDhqqDu4uVRx8URw0TJ001D5lHHwJHDRUHYMclFbCwZfG
QUPVNSjgp+HmIWgAG/wcEg==
                    "]], 
                    
                    FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2,
                     0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 
                    0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1,
                     0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 
                    2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 
                    1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0,
                     1, 0}, {0, 1, 0}}}, CompressedData["
1:eJx10EEKgCAQhWGpFtEyEAYGggQj6RKeoSMErbuCR0/IWfTgCcPwy7fR9XrO
u3fOTXWGOp2zM+ZvH2170nv+e2sFH0ijt45/XxJp9NgRPHYAb63kHhu9tf2H
eU8aPfbS9kxawAvxnrSCx3c3XzbS6JX4RFrAS34B53ckaw==
                    "]]}, {
                    FaceForm[
                    RGBColor[1., 1., 1., 1.]]}, StripOnInput -> False]}, 
                    ImageSize -> 15, PlotRange -> {{0., 15.75}, {0., 16.5}}, 
                    AspectRatio -> 1.15], "\"Submit to Repository\""}}, 
                    GridBoxAlignment -> {
                    "Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> 
                    False, GridBoxItemSize -> {
                    "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
                    GridBoxSpacings -> {
                    "Columns" -> {{0}}, "ColumnsIndexed" -> {2 -> 0.5}, 
                    "Rows" -> {{0}}}], "Grid"], 
                   
                   "\"Submit your function to the Wolfram Function Repository\
\""}, "PrettyTooltipTemplate"], 
                 With[{ResourceSystemClientTools`BuildDefinitionNotebook`\
Private`nb = ButtonNotebook[]}, 
                  ResourceSystemClient`DefinitionNotebook`DisplayStripe[
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb, 
                   ResourceSystemClient`DefinitionNotebook`SubmitRepository[
                   ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb], "ShowProgress" -> True]]& , 
                 "\"Submit your function to the Wolfram Function \
Repository\"", True}, "OrangeButtonTemplate"]]], StandardForm], Evaluator -> 
            "System", SingleEvaluation -> True]}}, 
         GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Center}}}, 
         AutoDelete -> False, 
         GridBoxBackground -> {"Columns" -> {{None}}, "Rows" -> {
             RGBColor[0.9882, 0.4196, 0.2039], 
             RGBColor[0.9216, 0.3412, 0.1059]}}, 
         GridBoxFrame -> {
          "Columns" -> False, 
           "RowsIndexed" -> {
            1 -> RGBColor[0.9882, 0.4196, 0.2039], 2 -> 
             RGBColor[0.9216, 0.3412, 0.1059]}}, 
         GridBoxItemSize -> {
          "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
         GridBoxSpacings -> {
          "Columns" -> {5, {0.9}, 5}, 
           "RowsIndexed" -> {1 -> 1.1, 2 -> 1.3, 3 -> 1.55}}, FrameStyle -> 
         RGBColor[0.9882, 0.4196, 0.2039]], "Grid"]& )}], 
   Cell[
    StyleData["ReviewerCommentLabelTemplate"], 
    TemplateBoxOptions -> {DisplayFunction -> (TagBox[
        GridBox[{{#, 
           TemplateBox[{
             GraphicsBox[{
               Thickness[0.0222], {
                FaceForm[{
                  RGBColor[0.8745, 0.2784, 0.0314], 
                  Opacity[1.]}], 
                
                FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                 3}}}, {{{45., 22.5}, {45., 10.074}, {34.926, 0.}, {22.5, 
                 0.}, {10.074, 0.}, {0., 10.074}, {0., 22.5}, {0., 34.926}, {
                 10.074, 45.}, {22.5, 45.}, {34.926, 45.}, {45., 34.926}, {
                 45., 22.5}}}]}, {
                FaceForm[{
                  RGBColor[1., 1., 1.], 
                  Opacity[1.]}], 
                
                FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {
                  1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3,
                   3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                  0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {
                  1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 
                  2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 
                  3}, {0, 1, 0}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 
                  3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}, {{0, 2, 
                  0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {
                  0, 1, 0}}}, {CompressedData["
1:eJxTTMoPSmViYGAwAWIQLckSxqe7SdlhmnN3zvPblg4w/smyffOl/K0cEp5e
ULq9U9lhT8lkCZZrVg6VL9UMOd4oO1SLrHN/GGXtcLUCKOCh4sDDpN0udtPa
4fnvlR8v8ao6ZIE12ELMrVZzAHLC+HjtHICGz32fruGQC1Zo57BASv+uCpsW
RP9Me4g9YjoQe3gcHICqlx/z1nNgAAEFB4j6Y/oOQMvOfVd2gLhjlgGEz+zg
oBnTf+irhiFEfw/UvDJDiP2+9g7qhhxrZGYZQtS9sHP48vdKxcs2Q4i72u0c
pEHOSTSEuxfsTiFDiPhCWwcXoHd+rzRwWOS67fPfEFuHx0tnH1EoMHDYUJQx
8a2MrUPQDrnW14IGUPfaOnzTAFq0VR8aXrYOoFA6V64HcccvWwfTuF2ePEy6
UPPtHIC+CH68VBvOP70QaNFeLTg/X6j5wKlELYdPl3yTBCLsIP7U0YK49y3U
PR80HQJ6p+cJHbaB88HqZ1jD1QNdUyWSZwWJH2stiHtuWcLdC+ND4lvfwbzT
MeHpBEt4+IPld1lA4p9DH+LuVgu4eeh8sH18hnA+2J6velB3aUHSyxE9iP8U
9aDpBMH3A/rWskQHYt8JBQw+TD0kPpTh5sHSMzgd/0TwYe6B8WHulY1Ksb7f
rwDng+PHSQES31csIPF7UREePgCOg02w
                  "], {{19.051, 14.242}, {19.051, 27.594}, {23.828, 27.594}, {
                  23.828, 26.543}, {21.426, 26.309}, {21.375, 26.258}, {
                  21.375, 24.219}, {21.375, 17.535}, {21.375, 15.602}, {
                  21.426, 15.547}, {23.828, 15.316}, {23.828, 14.242}}, {{
                  24.578, 18.75}, {24.578, 23.078}, {24.578, 23.539}, {24.953,
                   23.914}, {25.418, 23.91}, {29.746, 23.91}, {30.203, 
                  23.91}, {30.578, 23.539}, {30.578, 23.078}, {30.578, 
                  18.75}, {30.582, 18.289}, {30.207, 17.91}, {29.746, 
                  17.91}, {25.418, 17.91}, {24.953, 17.906}, {24.574, 
                  18.285}, {24.578, 18.75}}, {{31.328, 14.242}, {31.328, 
                  15.316}, {33.684, 15.539}, {33.789, 15.602}, {33.789, 
                  17.641}, {33.789, 24.188}, {33.789, 26.227}, {33.684, 
                  26.281}, {31.328, 26.512}, {31.328, 27.586}, {36.113, 
                  27.586}, {36.113, 14.234}}}]}}, {
              ImageSize -> 12, AspectRatio -> Automatic, Background -> None, 
               ImageSize -> {45., 45.}, PlotRange -> {{0., 45.}, {0., 45.}}}],
              "Wolfram Function Repository Reviewer"}, 
            "PrettyTooltipTemplate"]}}, 
         GridBoxAlignment -> {
          "Columns" -> {{Automatic}}, "Rows" -> {{Center}}}, AutoDelete -> 
         False, GridBoxItemSize -> {
          "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
         GridBoxSpacings -> {"Columns" -> {{0.25}}}], "Grid"]& )}], 
   Cell[
    StyleData["CommentCellLabelTemplate"], 
    TemplateBoxOptions -> {DisplayFunction -> (StyleBox[
        TagBox[
         GridBox[{{
            StyleBox[#, FontSize -> 11]}, {
            StyleBox[
             DynamicBox[
              ToBoxes[
               DateString[
                TimeZoneConvert[
                 DateObject[#2, TimeZone -> 0]], {
                "Month", "/", "Day", "/", "Year", " ", "Hour24", ":", 
                 "Minute"}], StandardForm], SingleEvaluation -> True], 
             FontSize -> 9]}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, 
          AutoDelete -> False, 
          GridBoxItemSize -> {
           "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
          GridBoxSpacings -> {"Columns" -> {{Automatic}}, "Rows" -> {{0}}}], 
         "Grid"], "CommentLabel", ShowStringCharacters -> False]& )}], 
   Cell[
    StyleData["OrangeButtonTemplate"], 
    TemplateBoxOptions -> {DisplayFunction -> (ButtonBox[
        StyleBox[#, "Text", FontFamily -> "Source Sans Pro", FontWeight -> 
         "SemiBold", FontTracking -> -0.9, FontSize -> 13, FontColor -> 
         GrayLevel[1], StripOnInput -> False], ButtonFunction :> 
        With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`nb$ = 
           ButtonNotebook[], 
           ResourceSystemClientTools`BuildDefinitionNotebook`Private`$cp$ = \
$ContextPath}, 
          Quiet[
           
           Block[{$ContextPath = 
             ResourceSystemClientTools`BuildDefinitionNotebook`Private`$cp$, 
             ResourceSystemClient`$AsyncronousResourceInformationUpdates = 
             False}, Needs["ResourceSystemClient`DefinitionNotebook`"]; 
            ResourceSystemClient`DefinitionNotebook`CheckForUpdates[
             ResourceSystemClientTools`BuildDefinitionNotebook`Private`nb$, 
              If[
               TrueQ[#4], 
               
               With[{ResourceSystemClientTools`BuildDefinitionNotebook`\
Private`nb = ButtonNotebook[]}, 
                CurrentValue[
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb, {TaggingRules, "StatusMessage"}] = 
                 ProgressIndicator[Appearance -> "Necklace"]; #2[]; 
                CurrentValue[
                  ResourceSystemClientTools`BuildDefinitionNotebook`Private`\
nb, {TaggingRules, "StatusMessage"}] = ""; Null], 
               #2[]]]; Null]]], FrameMargins -> {{5, 5}, {0, 0}}, 
        Appearance -> {"Default" -> Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQvA6XhqPnQeIQhCyIrAwodd2K5Yo5IwQB2XDFcGXPAsWu
mjNdNmVARkARoDhc2aswqWtWLGhqIAgoDpSFuBao5QqGURB0BWwgAxgQo4xI
04h3G5E+JT7ciIkFYuIUAMJyEaA=
            "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Hover" -> 
          Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQvA6XhqMHARIQhCyIrAwotcmIc7UuOwQB2XDFcGX3/MXX
6LEv12ZDRkARoDhc2cswqY2GnGhqIAgoDpSFuBaoZTWGURC0GmwgAxgQo4xI
04h3G5E+JT7ciIkFYuIUAJxlBG4=
            "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Pressed" -> 
          Image[CompressedData["
1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz
UJAXikHs/xgAqyAQvA6XhqN3hfYQhCyIrAwo9e36ma8PbkIQkA1XDFf2vtzt
28Obu6Jsl2uzQRCQDRQBisOVvYlR+nb99I5gU7gaCAKKAMWBshDXArV8unUR
TQ0EAcWBsgxgQIwyIk0j3m1E+pT4cCMmFoiJUwBBtDmK
            "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, 
        Background -> RGBColor[0.9216, 0.3412, 0.1059], Method -> "Queued", 
        ImageSize -> {All, 23}, Evaluator -> Automatic]& )}], 
   Cell[
    StyleData["SuggestionGridTemplate"], 
    TemplateBoxOptions -> {DisplayFunction -> (StyleBox[
        FrameBox[
         AdjustmentBox[
          TagBox[
           GridBox[{{
              
              TemplateBox[{#2, #3, {16., 16.}, {{1., 17.}, {1., 17.}}}, 
               "SuggestionIconTemplate"], 
              
              PaneBox[#, ImageSizeAction -> "ShrinkToFit", BaselinePosition -> 
               Baseline, ImageSize -> Full], 
              AdjustmentBox[
               TemplateBox[{
                 ActionMenuBox[
                  TagBox[
                   PaneSelectorBox[{False -> GraphicsBox[{
                    EdgeForm[
                    Directive[
                    GrayLevel[1, 0], 
                    Thickness[0.025]]], 
                    FaceForm[#4], 
                    
                    RectangleBox[{-1.75, -2}, {1.75, 2}, RoundingRadius -> 
                    0.2], 
                    Thickness[0.15], #5, 
                    LineBox[{{-0.5, -1.}, {0.5, 0.}, {-0.5, 1.}}]}, 
                    ImageSize -> {Automatic, 15}, ImageMargins -> 0], True -> 
                    GraphicsBox[{
                    EdgeForm[
                    Directive[#5, 
                    Thickness[0.025]]], 
                    FaceForm[#2], 
                    
                    RectangleBox[{-1.75, -2}, {1.75, 2}, RoundingRadius -> 
                    0.2], 
                    Thickness[0.15], 
                    GrayLevel[1], 
                    LineBox[{{-0.5, -1.}, {0.5, 0.}, {-0.5, 1.}}]}, 
                    ImageSize -> {Automatic, 15}, ImageMargins -> 0]}, 
                    Dynamic[
                    CurrentValue["MouseOver"]], ImageSize -> Automatic, 
                    FrameMargins -> 0], 
                   MouseAppearanceTag["LinkHand"]], #6, Appearance -> None, 
                  Method -> "Queued"], "\"View suggestions\""}, 
                "PrettyTooltipTemplate"], BoxBaselineShift -> -0.3]}}, 
            GridBoxAlignment -> {
             "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> 
            False, GridBoxItemSize -> {
             "Columns" -> {Automatic, Automatic, Fit}, 
              "Rows" -> {{Automatic}}}, 
            GridBoxSpacings -> {"Columns" -> {{0.4}}}], "Grid"], 
          BoxMargins -> {{0.25, -1.}, {0.15, -0.15}}], 
         RoundingRadius -> {13, 75}, Background -> #4, FrameStyle -> None, 
         FrameMargins -> {{0, 8}, {0, 0}}, ImageMargins -> {{0, 0}, {5, 5}}, 
         StripOnInput -> False], "Text", FontColor -> #5, FontSize -> 14, 
        FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", 
        FontTracking -> "Plain", 
        PrivateFontOptions -> {"OperatorSubstitution" -> False}, 
        LineBreakWithin -> False]& )}], 
   Cell[
    StyleData["SuggestionIconTemplate"], 
    TemplateBoxOptions -> {DisplayFunction -> (GraphicsBox[{
         Thickness[0.0556], 
         StyleBox[{
           
           FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3,
             3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData["
1:eJxTTMoPSmVmYGBgBGJJIGZigIIGAwcIQ8kBxk94ekHp9k9Vh8qXaoYcOfoO
m+a+X37stKZDTP+hrxpzdOA0TBymDqYPl7n2pnG7PHlk4Pw5RxQ2FGWIwPWD
jI3p54WbLxuVYn3fnwluD8S8H/Yo9gD5KPYA+TB7YPph9sDMh9EwcZg6FPdh
MRfdXpi7YPph7oaZD/MXzB5c4QCzBwA/Dn+d
            "]]}, 
          FaceForm[#]], 
         StyleBox[{
           
           FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1,
              0}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1,
              3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{8.1753, 7.4169}, {
             7.7969, 11.3084}, {7.7969, 13.38}, {10.12, 13.38}, {10.12, 
             11.3084}, {9.7415, 7.4169}, {8.1753, 7.4169}}, CompressedData["
1:eJxTTMoPSmViYGCQBGIQDQFKDg+rRNa5P+RzKPOXE8vSVYTz8z+0ngxpVHCA
qBNwmPd++THv7/IO8q2vA3fICTpUvlQz5Hgj52DLdX1xga2QQxoYyDmcYLed
HTpfGM6/k8GQ3+giCue7M1dwq7wQg+vnmbyyKdBTAm6+tsTUK5wZknD7Pec2
qB1qk4K772Y8iCXtAHM/jP/bquBcxyUEfyJ/ldnqOmW4/sWTrBh9WVTg5rt0
5zz/3akCt//sGRBQgbsPxoe5H8aH+Q+mH+Z/mPmw8IHZDws/mPtg4Yse/gBw
FJLS
             "]}]}, 
          FaceForm[#2]]}, ImageSize -> #3, PlotRange -> #4, AspectRatio -> 
        Automatic, BaselinePosition -> Scaled[0.1]]& )}], 
   Cell[
    StyleData["UsageInputs", StyleDefinitions -> StyleData["Input"]], 
    CellMargins -> {{66, 10}, {0, 8}}, 
    StyleKeyMapping -> {"Tab" -> "UsageDescription"}, Evaluatable -> False, 
    CellEventActions -> {
     "ReturnKeyDown" :> 
      With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`nb = 
         Notebooks[
           EvaluationCell[]]}, SelectionMove[
          EvaluationCell[], After, Cell]; 
        NotebookWrite[
         ResourceSystemClientTools`BuildDefinitionNotebook`Private`nb, 
          Cell["", "UsageDescription"], All]; 
        SelectionMove[
         ResourceSystemClientTools`BuildDefinitionNotebook`Private`nb, Before,
           CellContents]], {"KeyDown", "\t"} :> Replace[SelectionMove[
          SelectedNotebook[], After, Cell]; NotebookFind[
          SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, 
          WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[
          SelectedNotebook[], All, CellContents, AutoScroll -> True]]}, 
    ShowAutoStyles -> False, ShowCodeAssist -> False, 
    CodeAssistOptions -> {"DynamicHighlighting" -> False}, 
    LineSpacing -> {1, 3}, TabSpacings -> {2.5}, CounterIncrements -> "Text", 
    FontFamily -> "Source Sans Pro", FontSize -> 15, FontWeight -> "Plain"], 
   Cell[
    StyleData["UsageDescription", StyleDefinitions -> StyleData["Text"]], 
    CellMargins -> {{86, 10}, {7, 0}}, 
    StyleKeyMapping -> {"Backspace" -> "UsageInputs"}, CellGroupingRules -> 
    "OutputGrouping", 
    CellEventActions -> {
     "ReturnKeyDown" :> 
      With[{ResourceSystemClientTools`BuildDefinitionNotebook`Private`nb = 
         Notebooks[
           EvaluationCell[]]}, SelectionMove[
          EvaluationCell[], After, Cell]; 
        NotebookWrite[
         ResourceSystemClientTools`BuildDefinitionNotebook`Private`nb, 
          Cell[
           BoxData[""], "UsageInputs", FontFamily -> "Source Sans Pro"], All]; 
        SelectionMove[
         ResourceSystemClientTools`BuildDefinitionNotebook`Private`nb, Before,
           CellContents]], {"KeyDown", "\t"} :> Replace[SelectionMove[
          SelectedNotebook[], After, Cell]; NotebookFind[
          SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, 
          WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[
          SelectedNotebook[], All, CellContents, AutoScroll -> True]]}, 
    ShowAutoSpellCheck -> False], 
   Cell[
    StyleData["Notes", StyleDefinitions -> StyleData["Item"]], CellDingbat -> 
    StyleBox["\[FilledVerySmallSquare]", FontColor -> GrayLevel[0.6]], 
    CellMargins -> {{66, 24}, {9, 7}}, ReturnCreatesNewCell -> False, 
    StyleKeyMapping -> {}, DefaultNewCellStyle -> "Notes", ShowAutoSpellCheck -> 
    False, GridBoxOptions -> {BaseStyle -> "TableNotes"}], 
   Cell[
    StyleData["TableNotes", StyleDefinitions -> StyleData["Notes"]], 
    CellDingbat -> None, CellFrameColor -> RGBColor[0.749, 0.694, 0.553], 
    StyleMenuListing -> None, 
    ButtonBoxOptions -> {Appearance -> {Automatic, None}}, 
    GridBoxOptions -> {
     FrameStyle -> GrayLevel[0.906], 
      GridBoxAlignment -> {
       "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
        "RowsIndexed" -> {}}, 
      GridBoxDividers -> {"Columns" -> {{None}}, "Rows" -> {{True}}}, 
      GridDefaultElement -> Cell["\[Placeholder]", "TableText"]}], 
   Cell[
    StyleData["TableText"], DefaultInlineFormatType -> 
    "DefaultInputInlineFormatType", AutoQuoteCharacters -> {}, 
    StyleMenuListing -> None], 
   Cell[
    StyleData["Hyperlink"], FontColor -> RGBColor[0.9216, 0.3412, 0.1059]], 
   Cell[
    StyleData["HyperlinkActive"], FontColor -> 
    RGBColor[0.6144, 0.2275, 0.0706]], 
   Cell[
    StyleData["Link"], FontFamily -> "Source Sans Pro", FontColor -> Dynamic[
      If[
       CurrentValue["MouseOver"], 
       RGBColor[0.8549, 0.3961, 0.1451], 
       RGBColor[0.0196, 0.2863, 0.651]]]], 
   Cell[
    StyleData["StringTypeLink"], 
    TemplateBoxOptions -> {DisplayFunction :> (TagBox[
        DynamicBox[
         If[
          CurrentValue["MouseOver"], 
          ButtonBox[
           StyleBox[#, FontColor -> RGBColor[0.9686, 0.4667, 0.]], 
           ButtonData -> #2], 
          ButtonBox[#, ButtonData -> #2]]], 
        MouseAppearanceTag["LinkHand"]]& )}, 
    ButtonBoxOptions -> {
     BaseStyle -> {FontColor -> GrayLevel[0.4667], "Link"}}], 
   Cell[
    StyleData["InlineFormula"], 
    HyphenationOptions -> {"HyphenationCharacter" -> "\[Continuation]"}, 
    LanguageCategory -> "Formula", AutoSpacing -> True, ScriptLevel -> 1, 
    SingleLetterItalics -> False, SpanMaxSize -> 1, StyleMenuListing -> None, 
    FontFamily -> "Source Sans Pro", FontSize -> 1. Inherited, 
    ButtonBoxOptions -> {Appearance -> {Automatic, None}}, 
    FractionBoxOptions -> {BaseStyle -> {SpanMaxSize -> Automatic}}, 
    GridBoxOptions -> {
     GridBoxItemSize -> {
       "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
        "RowsIndexed" -> {}}}], 
   Cell[
    StyleData["ExampleDelimiter"], Selectable -> False, ShowCellBracket -> 
    Automatic, CellMargins -> {{66, 14}, {5, 10}}, Evaluatable -> True, 
    CellGroupingRules -> {"SectionGrouping", 58}, 
    CellEvaluationFunction -> (($Line = 0; Null)& ), ShowCellLabel -> False, 
    CellLabelAutoDelete -> True, TabFilling -> 
    "\[LongDash]\[NegativeThickSpace]", TabSpacings -> {100}, 
    StyleMenuListing -> None, FontFamily -> "Verdana", FontWeight -> Bold, 
    FontSlant -> "Plain", FontColor -> GrayLevel[0.9059]], 
   Cell[
    StyleData["ExampleText", StyleDefinitions -> StyleData["Text"]]], 
   Cell[
    StyleData["PageBreak", StyleDefinitions -> StyleData["ExampleDelimiter"]],
     Selectable -> False, CellFrame -> {{0, 0}, {1, 0}}, 
    CellMargins -> {{66, 14}, {15, -5}}, 
    CellElementSpacings -> {"CellMinHeight" -> 1}, Evaluatable -> True, 
    CellEvaluationFunction -> (($Line = 0; Null)& ), CellFrameColor -> 
    GrayLevel[
      Rational[77, 85]]], 
   Cell[
    StyleData["Subsection"], Evaluatable -> True, 
    CellEvaluationFunction -> (($Line = 0; Null)& ), ShowCellLabel -> False], 
   Cell[
    StyleData["Subsubsection"], Evaluatable -> True, 
    CellEvaluationFunction -> (($Line = 0; Null)& ), ShowCellLabel -> False], 
   Cell[
    StyleData["Comment", StyleDefinitions -> StyleData["Text"]], 
    CellFrame -> {{3, 0}, {0, 0}}, CellMargins -> {{66, 0}, {1, 0}}, 
    CellElementSpacings -> {"ClosedCellHeight" -> 0}, CellFrameColor -> 
    RGBColor[0.8807, 0.611, 0.1421], 
    CellFrameLabelMargins -> {{0, 10}, {0, 0}}, FontColor -> GrayLevel[0.25], 
    Background -> RGBColor[0.9821, 0.9417, 0.8713]], 
   Cell[
    StyleData["AuthorComment", StyleDefinitions -> StyleData["Comment"]], 
    CellFrameColor -> RGBColor[0.3684, 0.5068, 0.7098], Background -> 
    RGBColor[0.9053, 0.926, 0.9565]], 
   Cell[
    StyleData["ReviewerComment", StyleDefinitions -> StyleData["Comment"]], 
    CellFrameColor -> RGBColor[0.5602, 0.6916, 0.1949], Background -> 
    RGBColor[0.934, 0.9537, 0.8792]], 
   Cell[
    StyleData["CommentLabel", StyleDefinitions -> StyleData["Text"]], 
    ShowStringCharacters -> False, FontSlant -> "Italic", FontColor -> 
    GrayLevel[0.5]], 
   Cell[
    StyleData["CharactersRefLink"], ShowSpecialCharacters -> False], 
   Cell[
    StyleData["DockedCell"], CellFrameColor -> GrayLevel[0.75], Background -> 
    GrayLevel[0.9]]}, Visible -> False, FrontEndVersion -> 
  "12.1 for Microsoft Windows (64-bit) (January 18, 2020)", StyleDefinitions -> 
  "PrivateStylesheetFormatting.nb"],
ExpressionUUID->"53210a62-8e8f-4c24-9e2c-8fd0d414de7f"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
 "Name"->{
  Cell[580, 22, 631, 10, 98, "Title",ExpressionUUID->"f6181f0f-9201-4c4a-9b0a-4af3f323406e",
   CellTags->{"Name", "TemplateCell", "Title", "TabNext"},
   CellID->863144461]},
 "TemplateCell"->{
  Cell[580, 22, 631, 10, 98, "Title",ExpressionUUID->"f6181f0f-9201-4c4a-9b0a-4af3f323406e",
   CellTags->{"Name", "TemplateCell", "Title", "TabNext"},
   CellID->863144461],
  Cell[1214, 34, 676, 10, 34, "Text",ExpressionUUID->"7ac5a8da-f221-4b4d-84c9-85b4dd536fee",
   CellTags->{"Description", "TemplateCell", "TabNext"},
   CellID->997449289]},
 "Title"->{
  Cell[580, 22, 631, 10, 98, "Title",ExpressionUUID->"f6181f0f-9201-4c4a-9b0a-4af3f323406e",
   CellTags->{"Name", "TemplateCell", "Title", "TabNext"},
   CellID->863144461]},
 "TabNext"->{
  Cell[580, 22, 631, 10, 98, "Title",ExpressionUUID->"f6181f0f-9201-4c4a-9b0a-4af3f323406e",
   CellTags->{"Name", "TemplateCell", "Title", "TabNext"},
   CellID->863144461],
  Cell[1214, 34, 676, 10, 34, "Text",ExpressionUUID->"7ac5a8da-f221-4b4d-84c9-85b4dd536fee",
   CellTags->{"Description", "TemplateCell", "TabNext"},
   CellID->997449289],
  Cell[8423, 203, 297, 6, 27, "UsageInputs",ExpressionUUID->"5ad56cd9-e63d-40c1-8bd8-32a878ab3a26",
   CellTags->"TabNext",
   CellID->341013815],
  Cell[8723, 211, 406, 10, 26, "UsageDescription",ExpressionUUID->"7c7223b2-0e52-486a-a085-43fd4852a2d7",
   CellTags->"TabNext",
   CellID->584004037],
  Cell[9166, 226, 830, 17, 27, "UsageInputs",ExpressionUUID->"bf8dbb11-8e4d-45bb-9494-1d0543871840",
   CellTags->"TabNext",
   CellID->31868842],
  Cell[9999, 245, 556, 15, 26, "UsageDescription",ExpressionUUID->"cd36b5f1-a152-4ae3-a1d9-c9cf7f007d44",
   CellTags->"TabNext",
   CellID->408893626],
  Cell[11907, 295, 558, 8, 35, "Notes",ExpressionUUID->"67da5435-a568-4f86-bdb1-cbbd8226e597",
   CellTags->"TabNext",
   CellID->521904482],
  Cell[27281, 662, 590, 9, 34, "Text",ExpressionUUID->"7c84c0c1-1173-4213-b48e-1580f260a399",
   CellTags->"TabNext",
   CellID->832483124],
  Cell[28755, 699, 519, 8, 31, "Item",ExpressionUUID->"500c7c8b-ab0d-4741-9dd0-a2001b44d23a",
   CellTags->"TabNext",
   CellID->123227828],
  Cell[36811, 960, 556, 8, 31, "Item",ExpressionUUID->"02dacd04-fdb8-4948-a204-82cc827f8128",
   CellTags->"TabNext",
   CellID->79477165],
  Cell[38278, 996, 563, 8, 31, "Item",ExpressionUUID->"23742a88-b915-451a-8670-5a45db9e3376",
   CellTags->"TabNext",
   CellID->960273585],
  Cell[39803, 1033, 551, 8, 34, "Text",ExpressionUUID->"dae70aa7-0c5a-4a63-9d89-7571818a98ec",
   CellTags->"TabNext",
   CellID->343081869],
  Cell[41168, 1069, 540, 8, 31, "Item",ExpressionUUID->"49abed7e-d882-42a2-9ef2-545519e3fc0a",
   CellTags->"TabNext",
   CellID->485448166],
  Cell[43304, 1130, 564, 8, 34, "Text",ExpressionUUID->"263262db-c25d-464c-9dfe-1f30c0af97e0",
   CellTags->"TabNext",
   CellID->567921317],
  Cell[44787, 1167, 550, 8, 34, "Text",ExpressionUUID->"45e4f379-b8bd-413c-ba86-6dff720a7f15",
   CellTags->"TabNext",
   CellID->920818074]},
 "Description"->{
  Cell[1214, 34, 676, 10, 34, "Text",ExpressionUUID->"7ac5a8da-f221-4b4d-84c9-85b4dd536fee",
   CellTags->{"Description", "TemplateCell", "TabNext"},
   CellID->997449289]},
 "Definition"->{
  Cell[1915, 48, 1059, 24, 67, "Section",ExpressionUUID->"d4cfa75a-863c-4862-b5a7-8121aef65f21",
   CellTags->{"Definition", "Function", "TemplateCellGroup"},
   CellID->271561301]},
 "Function"->{
  Cell[1915, 48, 1059, 24, 67, "Section",ExpressionUUID->"d4cfa75a-863c-4862-b5a7-8121aef65f21",
   CellTags->{"Definition", "Function", "TemplateCellGroup"},
   CellID->271561301]},
 "TemplateCellGroup"->{
  Cell[1915, 48, 1059, 24, 67, "Section",ExpressionUUID->"d4cfa75a-863c-4862-b5a7-8121aef65f21",
   CellTags->{"Definition", "Function", "TemplateCellGroup"},
   CellID->271561301],
  Cell[6588, 154, 1810, 45, 54, "Subsection",ExpressionUUID->"2f96b192-bd56-4ab9-9aa3-7140a0608e08",
   CellTags->{"TemplateCellGroup", "Usage"},
   CellID->657272351],
  Cell[10604, 266, 1300, 27, 54, "Subsection",ExpressionUUID->"33bad14c-b36e-49c6-b2a4-db806adb0f01",
   CellTags->{"Details & Options", "Notes", "TemplateCellGroup"},
   CellID->25317349],
  Cell[12514, 309, 6747, 146, 67, "Section",ExpressionUUID->"fc7ecdc9-eae7-4611-a41d-04f37b474bf1",
   CellTags->{"Examples", "TemplateCellGroup"},
   CellID->487306095],
  Cell[26409, 639, 869, 21, 54, "Subsection",ExpressionUUID->"a3651dd8-397a-41d2-83ca-16b10ee5d783",
   CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"},
   CellID->581484318],
  Cell[27908, 676, 844, 21, 54, "Subsection",ExpressionUUID->"79cc3f50-029b-485f-a1af-4ae5145cccef",
   CellTags->{"Keywords", "TemplateCellGroup"},
   CellID->234953024],
  Cell[29311, 712, 185, 3, 54, "Subsection",ExpressionUUID->"538d2a3d-07db-4149-afc5-7925d0469e97",
   CellTags->{"Categories", "TemplateCellGroup"},
   CellID->360699210],
  Cell[35987, 937, 821, 21, 54, "Subsection",ExpressionUUID->"86086004-4d28-4f5b-9b74-c3ff70fafbca",
   CellTags->{"Related Symbols", "TemplateCellGroup"},
   CellID->787980732],
  Cell[37404, 973, 871, 21, 54, "Subsection",ExpressionUUID->"99173e86-3d2c-4b91-9e6e-3f80441efafd",
   CellTags->{"Related Resource Objects", "TemplateCellGroup"},
   CellID->202501204],
  Cell[38878, 1009, 922, 22, 54, "Subsection",ExpressionUUID->"9c95ac9b-75bf-470f-a1e2-ed79ba3c9950",
   CellTags->{"Source/Reference Citation", "TemplateCellGroup"},
   CellID->720896096],
  Cell[40391, 1046, 774, 21, 54, "Subsection",ExpressionUUID->"9589f8d3-750e-4df0-8553-cfefa527365e",
   CellTags->{"Links", "TemplateCellGroup"},
   CellID->282884713],
  Cell[41745, 1082, 949, 23, 54, "Subsection",ExpressionUUID->"da064dbe-0ed9-40ad-bb18-d3f82cc8ae23",
   CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"},
   CellID->899735658],
  Cell[43115, 1125, 186, 3, 67, "Section",ExpressionUUID->"88e7e1f8-c326-4af2-907e-b6f7cd231fb9",
   CellTags->{"Author Notes", "TemplateCellGroup"},
   CellID->871584409],
  Cell[43905, 1143, 879, 22, 67, "Section",ExpressionUUID->"c2ad0594-c7f8-4152-a325-f04f8e18f05a",
   CellTags->{"Submission Notes", "TemplateCellGroup"},
   CellID->22658912]},
 "Documentation"->{
  Cell[6428, 148, 135, 2, 67, "Section",ExpressionUUID->"b9005b1d-1c5f-4d2b-b2d5-9074bbfd15d1",
   CellTags->"Documentation",
   CellID->363488142]},
 "Usage"->{
  Cell[6588, 154, 1810, 45, 54, "Subsection",ExpressionUUID->"2f96b192-bd56-4ab9-9aa3-7140a0608e08",
   CellTags->{"TemplateCellGroup", "Usage"},
   CellID->657272351]},
 "Details & Options"->{
  Cell[10604, 266, 1300, 27, 54, "Subsection",ExpressionUUID->"33bad14c-b36e-49c6-b2a4-db806adb0f01",
   CellTags->{"Details & Options", "Notes", "TemplateCellGroup"},
   CellID->25317349]},
 "Notes"->{
  Cell[10604, 266, 1300, 27, 54, "Subsection",ExpressionUUID->"33bad14c-b36e-49c6-b2a4-db806adb0f01",
   CellTags->{"Details & Options", "Notes", "TemplateCellGroup"},
   CellID->25317349]},
 "Examples"->{
  Cell[12514, 309, 6747, 146, 67, "Section",ExpressionUUID->"fc7ecdc9-eae7-4611-a41d-04f37b474bf1",
   CellTags->{"Examples", "TemplateCellGroup"},
   CellID->487306095]},
 "Source & Additional Information"->{
  Cell[26213, 633, 171, 2, 67, "Section",ExpressionUUID->"280d96d4-4373-474f-a659-8edbdf8cf485",
   CellTags->"Source & Additional Information",
   CellID->348526984]},
 "Contributed By"->{
  Cell[26409, 639, 869, 21, 54, "Subsection",ExpressionUUID->"a3651dd8-397a-41d2-83ca-16b10ee5d783",
   CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"},
   CellID->581484318]},
 "ContributorInformation"->{
  Cell[26409, 639, 869, 21, 54, "Subsection",ExpressionUUID->"a3651dd8-397a-41d2-83ca-16b10ee5d783",
   CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"},
   CellID->581484318]},
 "Keywords"->{
  Cell[27908, 676, 844, 21, 54, "Subsection",ExpressionUUID->"79cc3f50-029b-485f-a1af-4ae5145cccef",
   CellTags->{"Keywords", "TemplateCellGroup"},
   CellID->234953024]},
 "Categories"->{
  Cell[29311, 712, 185, 3, 54, "Subsection",ExpressionUUID->"538d2a3d-07db-4149-afc5-7925d0469e97",
   CellTags->{"Categories", "TemplateCellGroup"},
   CellID->360699210]},
 "CategoriesCell"->{
  Cell[29499, 717, 6451, 215, 231, "Output",ExpressionUUID->"8b0155aa-a24f-4a28-ad22-19b9670f3563",
   CellTags->"CategoriesCell",
   CellID->725683702]},
 "Related Symbols"->{
  Cell[35987, 937, 821, 21, 54, "Subsection",ExpressionUUID->"86086004-4d28-4f5b-9b74-c3ff70fafbca",
   CellTags->{"Related Symbols", "TemplateCellGroup"},
   CellID->787980732]},
 "Related Resource Objects"->{
  Cell[37404, 973, 871, 21, 54, "Subsection",ExpressionUUID->"99173e86-3d2c-4b91-9e6e-3f80441efafd",
   CellTags->{"Related Resource Objects", "TemplateCellGroup"},
   CellID->202501204]},
 "Source/Reference Citation"->{
  Cell[38878, 1009, 922, 22, 54, "Subsection",ExpressionUUID->"9c95ac9b-75bf-470f-a1e2-ed79ba3c9950",
   CellTags->{"Source/Reference Citation", "TemplateCellGroup"},
   CellID->720896096]},
 "Links"->{
  Cell[40391, 1046, 774, 21, 54, "Subsection",ExpressionUUID->"9589f8d3-750e-4df0-8553-cfefa527365e",
   CellTags->{"Links", "TemplateCellGroup"},
   CellID->282884713]},
 "Tests"->{
  Cell[41745, 1082, 949, 23, 54, "Subsection",ExpressionUUID->"da064dbe-0ed9-40ad-bb18-d3f82cc8ae23",
   CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"},
   CellID->899735658]},
 "VerificationTests"->{
  Cell[41745, 1082, 949, 23, 54, "Subsection",ExpressionUUID->"da064dbe-0ed9-40ad-bb18-d3f82cc8ae23",
   CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"},
   CellID->899735658]},
 "Author Notes"->{
  Cell[43115, 1125, 186, 3, 67, "Section",ExpressionUUID->"88e7e1f8-c326-4af2-907e-b6f7cd231fb9",
   CellTags->{"Author Notes", "TemplateCellGroup"},
   CellID->871584409]},
 "Submission Notes"->{
  Cell[43905, 1143, 879, 22, 67, "Section",ExpressionUUID->"c2ad0594-c7f8-4152-a325-f04f8e18f05a",
   CellTags->{"Submission Notes", "TemplateCellGroup"},
   CellID->22658912]}
 }
*)
(*CellTagsIndex
CellTagsIndex->{
 {"Name", 132304, 2853},
 {"TemplateCell", 132499, 2857},
 {"Title", 132860, 2864},
 {"TabNext", 133050, 2868},
 {"Description", 135290, 2914},
 {"Definition", 135481, 2918},
 {"Function", 135679, 2922},
 {"TemplateCellGroup", 135886, 2926},
 {"Documentation", 138436, 2969},
 {"Usage", 138598, 2973},
 {"Details & Options", 138792, 2977},
 {"Notes", 138995, 2981},
 {"Examples", 139201, 2985},
 {"Source & Additional Information", 139411, 2989},
 {"Contributed By", 139601, 2993},
 {"ContributorInformation", 139835, 2997},
 {"Keywords", 140055, 3001},
 {"Categories", 140245, 3005},
 {"CategoriesCell", 140440, 3009},
 {"Related Symbols", 140617, 3013},
 {"Related Resource Objects", 140828, 3017},
 {"Source/Reference Citation", 141049, 3021},
 {"Links", 141252, 3025},
 {"Tests", 141435, 3029},
 {"VerificationTests", 141651, 3033},
 {"Author Notes", 141862, 3037},
 {"Submission Notes", 142059, 3041}
 }
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 631, 10, 98, "Title",ExpressionUUID->"f6181f0f-9201-4c4a-9b0a-4af3f323406e",
 CellTags->{"Name", "TemplateCell", "Title", "TabNext"},
 CellID->863144461],
Cell[1214, 34, 676, 10, 34, "Text",ExpressionUUID->"7ac5a8da-f221-4b4d-84c9-85b4dd536fee",
 CellTags->{"Description", "TemplateCell", "TabNext"},
 CellID->997449289],
Cell[CellGroupData[{
Cell[1915, 48, 1059, 24, 67, "Section",ExpressionUUID->"d4cfa75a-863c-4862-b5a7-8121aef65f21",
 CellTags->{"Definition", "Function", "TemplateCellGroup"},
 CellID->271561301],
Cell[2977, 74, 2268, 42, 262, "Input",ExpressionUUID->"a64f9ff6-057b-48a6-a287-2a5da7017184",
 CellID->358736959],
Cell[5248, 118, 1143, 25, 68, "Input",ExpressionUUID->"5c9b17ae-1602-4e55-86bb-45e14d308ae7",
 CellID->42226684]
}, Open  ]],
Cell[CellGroupData[{
Cell[6428, 148, 135, 2, 67, "Section",ExpressionUUID->"b9005b1d-1c5f-4d2b-b2d5-9074bbfd15d1",
 CellTags->"Documentation",
 CellID->363488142],
Cell[CellGroupData[{
Cell[6588, 154, 1810, 45, 54, "Subsection",ExpressionUUID->"2f96b192-bd56-4ab9-9aa3-7140a0608e08",
 CellTags->{"TemplateCellGroup", "Usage"},
 CellID->657272351],
Cell[CellGroupData[{
Cell[8423, 203, 297, 6, 27, "UsageInputs",ExpressionUUID->"5ad56cd9-e63d-40c1-8bd8-32a878ab3a26",
 CellTags->"TabNext",
 CellID->341013815],
Cell[8723, 211, 406, 10, 26, "UsageDescription",ExpressionUUID->"7c7223b2-0e52-486a-a085-43fd4852a2d7",
 CellTags->"TabNext",
 CellID->584004037]
}, Open  ]],
Cell[CellGroupData[{
Cell[9166, 226, 830, 17, 27, "UsageInputs",ExpressionUUID->"bf8dbb11-8e4d-45bb-9494-1d0543871840",
 CellTags->"TabNext",
 CellID->31868842],
Cell[9999, 245, 556, 15, 26, "UsageDescription",ExpressionUUID->"cd36b5f1-a152-4ae3-a1d9-c9cf7f007d44",
 CellTags->"TabNext",
 CellID->408893626]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[10604, 266, 1300, 27, 54, "Subsection",ExpressionUUID->"33bad14c-b36e-49c6-b2a4-db806adb0f01",
 CellTags->{"Details & Options", "Notes", "TemplateCellGroup"},
 CellID->25317349],
Cell[11907, 295, 558, 8, 35, "Notes",ExpressionUUID->"67da5435-a568-4f86-bdb1-cbbd8226e597",
 CellTags->"TabNext",
 CellID->521904482]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[12514, 309, 6747, 146, 67, "Section",ExpressionUUID->"fc7ecdc9-eae7-4611-a41d-04f37b474bf1",
 CellTags->{"Examples", "TemplateCellGroup"},
 CellID->487306095],
Cell[CellGroupData[{
Cell[19286, 459, 111, 1, 54, "Subsection",ExpressionUUID->"c9aa0128-8721-417f-a772-378c24a4f2bd",
 CellID->462042388],
Cell[19400, 462, 378, 8, 34, "Text",ExpressionUUID->"50a622ee-deed-41e0-977b-46bfd7d7d15e",
 CellID->13078159],
Cell[19781, 472, 1172, 24, 203, "Input",ExpressionUUID->"3d5b7d93-809f-4001-831d-cc43feab61aa",
 CellID->443871870],
Cell[20956, 498, 239, 3, 34, "Text",ExpressionUUID->"98b407e4-7c48-47ff-8394-aee44cabed21",
 CellID->276878918],
Cell[21198, 503, 127, 2, 28, "Input",ExpressionUUID->"4a7db7d7-e603-4973-a6b3-fabf6b81e360",
 CellID->222156811],
Cell[21328, 507, 307, 6, 34, "Text",ExpressionUUID->"f048a551-2a2d-4a99-bf39-fab22351aab9",
 CellID->419280125],
Cell[21638, 515, 494, 11, 39, "Print",ExpressionUUID->"af07e898-c92c-4592-8f69-237886f41ad8",
 CellID->102525359],
Cell[22135, 528, 194, 2, 34, "Text",ExpressionUUID->"7cb9a296-1f08-4b6f-9f0e-4db289eacc6c",
 CellID->348031179],
Cell[22332, 532, 526, 12, 39, "Print",ExpressionUUID->"99a98a9f-08dc-4c2c-a742-730738940893",
 CellID->275814207],
Cell[22861, 546, 200, 2, 34, "Text",ExpressionUUID->"fc000883-8b7f-4fca-a6ff-077745ef5bc8",
 CellID->343388591],
Cell[23064, 550, 525, 12, 39, "Print",ExpressionUUID->"95771b9c-f7e4-44a8-9477-2f838efacbab",
 CellID->621837776],
Cell[23592, 564, 260, 5, 34, "Text",ExpressionUUID->"e2a0ff58-2672-4bb2-8f03-1af207114672",
 CellID->94093802],
Cell[23855, 571, 999, 15, 32, "Output",ExpressionUUID->"78ff84ae-489a-4a39-bee2-030e1999249e",
 CellID->38682943]
}, Open  ]],
Cell[CellGroupData[{
Cell[24891, 591, 102, 1, 54, "Subsection",ExpressionUUID->"eca53f1e-bf07-4301-a6ce-a76254cc6059",
 CellID->964056545],
Cell[24996, 594, 204, 4, 34, "Text",ExpressionUUID->"46b4e134-5c95-44d4-8577-56622b189df7",
 CellID->649685796],
Cell[CellGroupData[{
Cell[25225, 602, 195, 4, 28, "Input",ExpressionUUID->"48d4f25b-9def-4f34-8c4d-887319bcb20b",
 CellID->836153427],
Cell[25423, 608, 159, 3, 32, "Output",ExpressionUUID->"cc273585-cf5b-4af2-8755-d071c18a3129",
 CellID->147179208]
}, Open  ]]
}, Open  ]],
Cell[25609, 615, 104, 1, 54, "Subsection",ExpressionUUID->"55028938-382d-4f68-a553-ac09174e363f",
 CellID->776923543],
Cell[25716, 618, 109, 1, 38, "Subsection",ExpressionUUID->"b19edd06-8da5-4334-8a17-4c5da46f2210",
 CellID->568056528],
Cell[25828, 621, 121, 1, 38, "Subsection",ExpressionUUID->"9ac4a8cd-b9b9-4703-9f76-48779071a24d",
 CellID->754506620],
Cell[25952, 624, 111, 1, 38, "Subsection",ExpressionUUID->"243c172f-9793-42a6-a40b-763074e87f3d",
 CellID->92483860],
Cell[26066, 627, 110, 1, 38, "Subsection",ExpressionUUID->"1ef0203e-2fd8-4fa4-9b8e-affab2d5b384",
 CellID->540091361]
}, Open  ]],
Cell[CellGroupData[{
Cell[26213, 633, 171, 2, 67, "Section",ExpressionUUID->"280d96d4-4373-474f-a659-8edbdf8cf485",
 CellTags->"Source & Additional Information",
 CellID->348526984],
Cell[CellGroupData[{
Cell[26409, 639, 869, 21, 54, "Subsection",ExpressionUUID->"a3651dd8-397a-41d2-83ca-16b10ee5d783",
 CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"},
 CellID->581484318],
Cell[27281, 662, 590, 9, 34, "Text",ExpressionUUID->"7c84c0c1-1173-4213-b48e-1580f260a399",
 CellTags->"TabNext",
 CellID->832483124]
}, Open  ]],
Cell[CellGroupData[{
Cell[27908, 676, 844, 21, 54, "Subsection",ExpressionUUID->"79cc3f50-029b-485f-a1af-4ae5145cccef",
 CellTags->{"Keywords", "TemplateCellGroup"},
 CellID->234953024],
Cell[28755, 699, 519, 8, 31, "Item",ExpressionUUID->"500c7c8b-ab0d-4741-9dd0-a2001b44d23a",
 CellTags->"TabNext",
 CellID->123227828]
}, Open  ]],
Cell[CellGroupData[{
Cell[29311, 712, 185, 3, 54, "Subsection",ExpressionUUID->"538d2a3d-07db-4149-afc5-7925d0469e97",
 CellTags->{"Categories", "TemplateCellGroup"},
 CellID->360699210],
Cell[29499, 717, 6451, 215, 231, "Output",ExpressionUUID->"8b0155aa-a24f-4a28-ad22-19b9670f3563",
 CellTags->"CategoriesCell",
 CellID->725683702]
}, Open  ]],
Cell[CellGroupData[{
Cell[35987, 937, 821, 21, 54, "Subsection",ExpressionUUID->"86086004-4d28-4f5b-9b74-c3ff70fafbca",
 CellTags->{"Related Symbols", "TemplateCellGroup"},
 CellID->787980732],
Cell[36811, 960, 556, 8, 31, "Item",ExpressionUUID->"02dacd04-fdb8-4948-a204-82cc827f8128",
 CellTags->"TabNext",
 CellID->79477165]
}, Open  ]],
Cell[CellGroupData[{
Cell[37404, 973, 871, 21, 54, "Subsection",ExpressionUUID->"99173e86-3d2c-4b91-9e6e-3f80441efafd",
 CellTags->{"Related Resource Objects", "TemplateCellGroup"},
 CellID->202501204],
Cell[38278, 996, 563, 8, 31, "Item",ExpressionUUID->"23742a88-b915-451a-8670-5a45db9e3376",
 CellTags->"TabNext",
 CellID->960273585]
}, Open  ]],
Cell[CellGroupData[{
Cell[38878, 1009, 922, 22, 54, "Subsection",ExpressionUUID->"9c95ac9b-75bf-470f-a1e2-ed79ba3c9950",
 CellTags->{"Source/Reference Citation", "TemplateCellGroup"},
 CellID->720896096],
Cell[39803, 1033, 551, 8, 34, "Text",ExpressionUUID->"dae70aa7-0c5a-4a63-9d89-7571818a98ec",
 CellTags->"TabNext",
 CellID->343081869]
}, Open  ]],
Cell[CellGroupData[{
Cell[40391, 1046, 774, 21, 54, "Subsection",ExpressionUUID->"9589f8d3-750e-4df0-8553-cfefa527365e",
 CellTags->{"Links", "TemplateCellGroup"},
 CellID->282884713],
Cell[41168, 1069, 540, 8, 31, "Item",ExpressionUUID->"49abed7e-d882-42a2-9ef2-545519e3fc0a",
 CellTags->"TabNext",
 CellID->485448166]
}, Open  ]],
Cell[CellGroupData[{
Cell[41745, 1082, 949, 23, 54, "Subsection",ExpressionUUID->"da064dbe-0ed9-40ad-bb18-d3f82cc8ae23",
 CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"},
 CellID->899735658],
Cell[CellGroupData[{
Cell[42719, 1109, 184, 4, 28, "Input",ExpressionUUID->"f71ac60b-e0ba-461c-ad67-5f4ee85bc276",
 CellID->667877521],
Cell[42906, 1115, 148, 3, 32, "Output",ExpressionUUID->"67cfff4d-af89-4f12-9aa4-0dacafe8d1f2",
 CellID->993233288]
}, Open  ]]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[43115, 1125, 186, 3, 67, "Section",ExpressionUUID->"88e7e1f8-c326-4af2-907e-b6f7cd231fb9",
 CellTags->{"Author Notes", "TemplateCellGroup"},
 CellID->871584409],
Cell[43304, 1130, 564, 8, 34, "Text",ExpressionUUID->"263262db-c25d-464c-9dfe-1f30c0af97e0",
 CellTags->"TabNext",
 CellID->567921317]
}, Open  ]],
Cell[CellGroupData[{
Cell[43905, 1143, 879, 22, 67, "Section",ExpressionUUID->"c2ad0594-c7f8-4152-a325-f04f8e18f05a",
 CellTags->{"Submission Notes", "TemplateCellGroup"},
 CellID->22658912],
Cell[44787, 1167, 550, 8, 34, "Text",ExpressionUUID->"45e4f379-b8bd-413c-ba86-6dff720a7f15",
 CellTags->"TabNext",
 CellID->920818074]
}, Open  ]]
}, Open  ]]
}
]
*)

